cursor position anzeigen

[Wadim]

Zitat von Christian Seehase:

Moin Wadim,

da sehe ich zwei Möglichkeiten:

Delphi-Quellcode:

var
  ptWork : TPoint;

begin
  // So wie's auch geht:
  Edit1.Text := IntToStr(Mouse.CursorPos.x) + 'x' + IntToStr(Mouse.CursorPos.y);
  // So wie Luckie es meinte
  GetCursorPos(ptWork);
  Edit2.Text := IntToStr(ptWork.x) + 'x' + IntToStr(ptWork.y); 
end;

Das Ergebnis ist, zwangsläufig, das gleiche.

Was hast Du denn genau vor.
Das über einen ButtonClick zu machen erscheint mir nicht wirklich sinnvoll, da dadurch die möglichen Koordinaten ja doch recht eingeschränkt sind.

das mit dem button click ist schon klar- habe es nur mit button gefragt damit ich das nicht genauer beschreiben muss was ich machen mus- mache es mit timer damit er es jede sec aktuell anzeigt