OK, sehe ich ein, danke ... das hätte ich auch selbst sehen können. Ergibt sich nur die Frage, wie ich meinen Parameter übergebe, an das Event..
Wie schon gesagt, entweder du wertest den Sender aus oder die Tag Eigenschaft des Buttons.
Delphi-Quellcode:
procedure TForm1.DeinOnClickEvent(Sender: TObject);
var
Button: TButton;
begin
if not (Sender is TButton) then
Exit;
Button := Sender as TButton;
// Möglichkeit 1
if Button.Name = ... then
// Möglichkeit 2
if Button.Caption = ... then
// Möglichkeit 3
if Button.Tag = ... then
// etc.
end;