Forum: Object-Pascal / Delphi-Language
Delphi
by nuclearping,
31. Mär 2011
Wie schon gesagt, entweder du wertest den Sender aus oder die Tag Eigenschaft des Buttons.
procedure TForm1.DeinOnClickEvent(Sender: TObject);
var
Button: TButton;
begin
if not (Sender is TButton) then
Exit;
Button := Sender as TButton;
Forum: Object-Pascal / Delphi-Language
Delphi
by nuclearping,
31. Mär 2011
OnClick ist immer eine TNotifyEvent Prozedur "of object", also immer procedure TIrgendeineKlasse.XYZClick(Sender: TObject) und keine anderen Parameter.
Wenn du wissen willst, welcher Button geklickt wurde, kannst du das entweder über "Sender as TButton" oder Button.Tag auswerten.