Schalterstatus von Unterformular an Hauptform übergeben

[grenzgaenger]

Zitat von devidespe:

Delphi-Quellcode:

PROCEDURE TMainForm.Button1Click(Sender: TObject);
VAR Unterformular : FormNeuesFormular.TNeuesFormular;
BEGIN
  Unterformular:=FormNeuesFormular.TNeuesFormular.Create(Application);
  TRY
    Unterformular.ShowModal;
  FINALLY
    Unterformular.Free;
  END;
END;

zum beispiel, in dem du den wert modalresult abfrägst

if Unterformular.ShowModal = mrOK then ...