Wie funzt das mit dem Sender bei Buttons

[bundy]

Hallo
Ich will ein Formular auf mehrer Buttons beziehen. :wall:

Wenn Konpf 1 dann Form.Label1.caption:='Knopf 1';
Wenn Knopf 2 dann Form.Label1.caption:='Knopf 2';
..
..
.
DAnke im Voraus

BUndy

[Tyrael Y.]

in das onClick Ereignis des Formulars

Delphi-Quellcode:

with Sender as TButton do
begin
 Form.Label1.caption := Sender.Caption;
end;

[Tyrael Y.]

übrigens das hat mit API nix zu tun ;)

[bundy]

Ich habe aber ein Hauptform dort befindet sich der Speedbutton´s.
Wenn ich auf speedbutton 1 drücke dann will ich das sich das form2 öffnet und das Label im form 2 sich ändert

[bundy]

HY danke funzt !!!! 8)

[sakura]

Ich schubse es trotzdem mal noch in Richtung VCL ;-)

...:cat:...