Da dat Programm ja irgendwo zu hängen scheint ... hast du es denn auch mal Schrittweise abgearbeitet?
Und um marabu's Hinweis zu befolgen:
Delphi-Quellcode:
Form3:=TForm3.Create(Self);
TRY
Form3.Show;
Form3.tolleProzedur; // statt in OnShow eine eigenständige Routine aufrufen
FINALLY BEGIN
Form3.Release;
Form3:=NIL;
END;
PS: i kann mi och noch an 'nen "bescheuerten" Versuch von mir erinnern
... Free innerhalb der Komponente ('s war zufällig och in 'nen Form)