Einzelnen Beitrag anzeigen

Benutzerbild von Dunkelbunt27
Dunkelbunt27

Registriert seit: 10. Aug 2010
232 Beiträge
 
Delphi XE Professional
 
#8

AW: Mauposition auf beweglichem Image ermitteln

  Alt 27. Feb 2011, 21:02
Also, ich hab es so gemacht:
Delphi-Quellcode:
public
procedure ImageMouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
...
procedure TProjekt.ImageMouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
   Testlabel.Caption := 'X: '+ IntToStr(X)+ 'Y: '+IntToStr(Y);
end;
Ist doch richtig, oder?
  Mit Zitat antworten Zitat