PageControl + 2 Forms

[youuu]

Hi,

Ich habe eine PageControl mit 2 Tabs, in jedem Tab soll ein Form geladen werden bei Programmstart

Delphi-Quellcode:

Var
  Form1 : TForm1;
  Form2 : TForm2;
begin
  Form1 := TForm1.Create(Tab1);  // Form1
  Form1.Parent:= Tab1;
  Form2 := TForm2.Create(Tab2);  // Form2
  Form2.Parent:= Tab2;

nun erhalte ich abr direkt eine Exception, bei Programmstart.

Laut EurekaLog wird der Fehler in diesem Modul ausgelöst "KERNELBASE.dll - (Client-DLL für Windows NT-Basis-API)"

Exception = EListError
Listenindex überschreitet das Maximum (30).

Assembler:

7614960B DB $C4, $0C, $8D, $45, $B0, $50, $FF //les ecx, [$FF50B045+ecx*4]
76149612 adc eax, $7614116C ; '.eÛw' ; <-- EXCEPTION
76149617 leaver

[mkinzler]

Nimm besser Frames

[youuu]

Danke, Frames sind wesentlich besser.