Thema: Delphi cursor position anzeigen

Einzelnen Beitrag anzeigen

Wadim

Registriert seit: 31. Aug 2003
185 Beiträge
 
#15

Re: cursor position anzeigen

  Alt 27. Sep 2003, 18:24
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
  Mit Zitat antworten Zitat