TListBox (dynamisch erstellt) wird nicht angezeigt

[pH1L]

Hi,
ich habe ein Problem mit folgendem Code:

Delphi-Quellcode:

ATabSheet:= TTabSheet.Create(PageControl1);
ATabSheet.Caption:= ListArray[i].Name;
ATabSheet.PageControl:= PageControl1;

AListBox:= TListBox.Create(ATabSheet);
AListBox.Name:= 'ListBox'+IntToStr(i);
AListBox.Parent:= ATabSheet;
AListBox.Visible:=True;
AListBox.Left:=0;
AListBox.Top:=0;
AListBox.Align:= alClient;
ListArray[i].ListBox:= AListBox;

Solange die MainForm beim erstellen von AListBox im Vordergrund ist,
gibt es keine Probleme. Ist sie es aber nicht, dann wird die ListBox
nicht im TabSheet angezeigt, und beim Beenden der Anwendung bekomme ich
eine Exception, und der Debugger beschwert sich :

Code:

---------------------------
Application Error
---------------------------
Exception EOSError in module Project1.exe at 0000E2BD.

System Error.  Code: 1400.

Ungültiges Fensterhandle.

---------------------------
OK   
---------------------------

---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EIdSocketError with message 'Socket Error # 10093
'.
---------------------------
Break   Continue   Help   
---------------------------

Ich habe einen TIdHTTPServer auf der Form, über den ich per "OnCommandGet"
die Anweisung zum erstellen der ListBox gebe.

hat irgendwer eine Idee, woran das liegen könnte ?

[pH1L]

Hm.. es scheint mit dem TIdHTTPServer zusammenzuhängen.
Wenn ich dessen Eigenschaft "Active" auf false setze taucht das Problem nicht mehr auf

[pH1L]

Problem gelöst

Das Problem, dass ich keine visuellen Komponenten dynamisch aus
einer Indy-(bisher mit HTTP- und FTP-Server getestet)-Prozedur erstellen konnte,
habe ich jetzt mit einem Timer gelöst, der in der Server-Prozedur
enabled wird, und dann die Kompos dynamisch erstellt.

Kann mir irgendeiner der Profis hier sagen, warum ich dieses
Problem habe, oder gibt es das vielleicht nur bei mir

Danke schonmal im Vorraus,
Phil