You should change the method SetMyList to:

procedure TInhertProducts.SetMyList(const Value: TStrings);
begin
FMyList.Assign( Value );
end;


On 9/8/05, Robert Pointon <[EMAIL PROTECTED]> wrote:
> 
> calling with Mlist.Mynum := 99; Access error.
> 
> <code>
> procedure TInhertProducts.SetMyList(const Value: TStrings);
> begin
> FMyList := Value;
> end;
> 
> </code>
>
_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi

Reply via email to