Also entweder die komplizierte:
Code:
procedure TForm1.Button2Click(Sender: TObject);
begin
TEST[color=#ff0000](Sender)[/color];
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
TEST[color=#ff0000](Sender)[/color];
end;
Oder die einfache, da weißt Du einfach im Objekt Inspektor beiden Komponenten die gleiche Ereignismethode zu
...
...