[DUG] Compnent creation question

[Neven MacEwan]

Robert

Have/can you updatebegin, updateend around the items property?

Randon thought of the top of my head

N
> 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: delphi at delphi.org.nz
> Admin: http://delphi.org.nz/mailman/listinfo/delphi
> Unsubscribe: send an email to delphi-request at delphi.org.nz with Subject: unsubscribe
>
>
>