mit resetPaintbox wird ans ich nicht viel gemacht:
Delphi-Quellcode:
procedure THURecords.ResetPaintBox;
begin
Paintbox.canvas.brush.color := clWhite;
PaintBox.Canvas.FillRect(Rect(0,0,Paintbox.Width,Paintbox.Height));
end;
habe mir eben mal die hilfe in delphi zu "ScreenToClient" angeschaut. aber irgendwie werde ich daraus nicht so wirklich schlau
Zitat:
Warum benutzt du eigentlich nicht den X und Y Parameter, der bereits als Client-Koordinate vorliegt?
meinst du damit diese werte: mouse.CursorPos.x ; mouse.CursorPos.y ?