Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Onmousedown einer TShape per Code ausführen
20. Jan 2013, 17:12
auch wenn ich es nicht für eine gute Idee halte
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Shape1MouseDown(Shape1,mbleft,[],0,0);
end;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|