Einzelnen Beitrag anzeigen

Benutzerbild von xZise
xZise

Registriert seit: 3. Mär 2006
Ort: Waldbronn
4.303 Beiträge
 
Delphi 2009 Professional
 
#20

Re: TInfoBox - eine InfoBox direkt auf dem Desktop

  Alt 3. Aug 2006, 15:57
Zitat von EDatabaseError:
OnLine 85 Kann er Mouse nicht finden
Siehe dsdt:
Zitat:
Bis einschließlich Delphi 3 steht TMouse nicht zur Verfügung. Hier kann folgender Code verwendet werden.
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
  P: TPoint;
begin
  GetCursorPos(P);
  Label1.Caption := IntToStr(P.X);
  Label1.Caption := IntToStr(P.Y);
end;
[Quelle]

@ Topic: Das scheint ja eine interssante Kombo zu sein... Ich werds mir mal anguggen.
Fabian
Eigentlich hat MS Windows ab Vista den Hang zur Selbstzerstörung abgewöhnt – mkinzler
  Mit Zitat antworten Zitat