Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
Re: Cursorposition ermitteln?
22. Dez 2004, 18:58
Delphi-Quellcode:
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
pt: Tpoint;
begin
pt := Mouse.CursorPos;
Caption := IntToStr(pt.X)
end;
Michael Ein Teil meines Codes würde euch verunsichern.
|