Hi,

   > procedureTwo(AStringList : TStringlist = nil);

Your code creates a new local StringList in procedureTwo.

Use a var parameter:

procedureTwo(var AStringList : TStringlist);

to pass the existing StringList, which is what I think you want.

Martin.

Reply via email to