Delphi Button

[Nils_13]

Zitat von Xenonz:

Ich meine wie man OnMouseDown auf einen Button bezieht. Kann jemand ein Beispiel machen?

Meinst du das ?

Delphi-Quellcode:

procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin

end;