The window handle has probably been destroyed at this stage - hence the error.
I'm not near my dev box - so off the top of my head try over riding the dispatch method for the OnDestroy method and call your code in there. HTH D On Wed, 15 Oct 2008 16:22:44 +1300, you wrote: >Hi > >Just trying to make a TComboBox that automatically frees its items. > >I have the following code in the destructor > > if (fAutomaticallyFreeObjects = True) > and ((csDesigning in ComponentState) = False) then begin > try > for Counter := 0 to Self.Items.Count - 1 do begin > O := Items.Objects[Counter]; > if (O <> nil) then begin > O.Free; > end; > end; > except > on e: exception do begin > ShowMessage(IntToStr(i) + ' ' + 'Attempting to >automatically free object memory. The following error occured...' + >#13#13 + e.message); > end; > end; > end; > > >I get a 'Control '' has no parent error. This happens when attempting >to access the .Items property. My custom error handling does not trigger. > >Any suggestions ? > >Thanks >Rob >_______________________________________________ >NZ Borland Developers Group - Delphi mailing list >Post: [email protected] >Admin: http://delphi.org.nz/mailman/listinfo/delphi >Unsubscribe: send an email to [EMAIL PROTECTED] with Subject: unsubscribe _______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: [email protected] Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to [EMAIL PROTECTED] with Subject: unsubscribe
