haupt formular, wert übergeben an unterformular ?

[shareholder]

hallo, wie im thema steht,
habe ich eine hauptformular (THaupt)

auf dem befindet sich ein button mit der Caption 'test'.
wird auf den button geklickt, soll im label, welches auf TUnterForm liegt

die Caption des Buttons, also 'test' angezeigt werden.

wie funktioniert das ?

danköööö :)

[mirage228]

Hi,

Diese Prozedur kannst du im OI allen Buttons zuweisen, die die ihren Namen in das Label legen sollen.

beim Click auf den Button:

Delphi-Quellcode:

procedure THaupt.Button1Click(Sender: TObject);
begin
  if (Sender is TControl) then
    UnterFormular.Label1.Caption := TControl(Sender).Caption;
end;

mfG
mirage228

[PhöniX]

im OnClick Ereignes des Buttons:

Delphi-Quellcode:

UnterForm.Label1.Caption := Button1.Caption;

oder einfach nur:

Delphi-Quellcode:

UnterForm.Label1.Caption := 'test';