Auslesen von z. Bsp Buttonvariablen

[Red_Wraith]

Hoi

Einmal mehr bin ich hier um um Hilfe zu bitten. Allerdings ist der Grund meines Hierseins die Tatsache, dass ich Delphi lange nicht benutzt habe und, wie ich beschämenderweise sagen muss, etwas vergessen habe.

Also folgendes:
Wenn ich zum Beispiel die Caption eines Buttons auslesen und in eine Variable schreiben will, würd ich das so machen:

string := Button1.Caption;

Wenn ich dieses OnClick-Event aber noch in Button2 reinmache, dann schreibt er in die Variable string trotzdem Button1.Caption. Nu kann ich noch ein zweites OnClick-Event für Button2 schreiben, damit der das Richtige in die Variable schreibt.

string := Button2.Caption;

Ich will jetzt aber ein und dasselbe Event für beide Buttons verwenden und hab leider vergessen, wie ich ermittle, dass immer die Caption von dem Button, der gerade geklickt wurde, in die Variable string wandert.

Wer weiß die Lösung

[SirThornberry]

so sollte es funktionieren
stringvariable := (Sender as TButton).Caption;

[Mystic]

str := (Sender as TButton).Caption; Sender ist das Objekt das das Ereignis ausgelöst hat.

/edit: Roter Kasten??

[Red_Wraith]

Okay, genau danach hatte ich gesucht, danke sehr

Wo is nen roter Kasten ? oO