Z-Order-Problem beim Fokuswechsel zwischen Haupt- und Unterformular

[DeddyH]

Dann könnte man aber auch "lazy initialization as usual" umsetzen, die Property kann ja ruhig privat sein.

Delphi-Quellcode:

type
  TMainForm = class(TForm)
    btnOpenSubform: TButton;
    procedure btnOpenSubformClick(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    FMySubForm : SubFormUnit.TSubForm;
    function GetMySubForm: SubFormUnit.TSubForm;
    property MySubForm: SubFormUnit.TSubForm read GetMySubForm; 
  public
  end;

...

function TMainForm.GetMySubForm: SubFormUnit.TSubForm;
begin
  if not Assigned(FMySubForm) then
    FMySubForm := SubFormUnit.TSubForm.Create(self);
  Result := FMySubForm;
end;

procedure TMainForm.btnOpenSubformClick(Sender: TObject);
begin
  MySubForm.Show; //die Property ansprechen, nicht das private Feld
end;