Statusbar in Formular, welches in ein anderes Formular eingebettet wird

[bcvs]

Und wenn du sowas machst:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormShow(Sender: TObject);
  private
    { Private-Deklarationen }
    fForm2:TForm2;
  public
    { Public-Deklarationen }
  end;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  fForm2 := TForm2.Create(Application);
  fForm2.Parent := self;
end;

procedure TForm1.FormShow(Sender: TObject);
begin
  fForm2.Show;
end;

Das wäre dann auch irgendwie logischer. Im OnCreate wird alles erzeugt und in OnShow alles angezeigt.