Eine Procedure für mehrere Buttons

[Singlepin]

Im Objetinspektor->Ereignisse kannst du jedem Button die gleiche Procedure zuweisen und über Sender kannst du ermittel welche Taste das Ereignis ausgelößt hat.

[Ioyou]

Zitat von Singlepin:

Im Objetinspektor->Ereignisse kannst du jedem Button die gleiche Procedure zuweisen und über Sender kannst du ermittel welche Taste das Ereignis ausgelößt hat.

Danke das funktioniert
Das einzige was bleibt ist das ich nach wie vor keine Idee habe wie ich jetzt von einen Button zu verschiedenen Prodceduren kommen soll. Wenn jemand da ne Idee hätte wär das echt toll.

[mkinzler]

Mit einem Ereignis kann nur eine Methode verknüpft werden

[DeddyH]

Ich verstehe Dein Anliegen zwar noch nicht ganz, aber Du könntest Deinen Buttons in der Tag-Eigenschaft eine Zahl hinterlegen, die Du dann auswerten bzw. weitergeben kannst.

Delphi-Quellcode:

procedure TForm1.ButtonClick(Sender: TObject);
begin
  if Sender is TButton then
    begin
      Procedure1(TButton(Sender).Tag));
      Procedure2(TButton(Sender).Tag));
    end;
end;