Neues Formular aufrufen

[Uwe Raabe]

Delphi-Quellcode:

var
  NeuesForm: TNeuesForm;  // oder wie auch immer das Ding heist
...
  NeuesForm := TNeuesForm.Create(nil);
  try
    NeuesForm.Variable1 := <was_auch_immer>; // Variable1 muss als Property in TNeuesForm angelegt sein.
    if NeuesForm.ShowNodal = mrOK then begin  // Einfach in TNeuesForm beim Schließen ModalResult := mrOK zuweisen.
      // tue was nötig ist
    end;
  finally
    NeuesForm.Free;
  end;
...