Passing in the array of TStringList in class constructor

From: BINU (ywlee_at_ar-vision.com)
Date: 12/15/04


Date: 14 Dec 2004 15:17:57 -0800

Hi, there
i'm delpie's newbie...
I have to pass the array of TStringList in the constructor.
I wonder it is possble?...how?

Here's code...

procedure myproc;
var
arraylist : Array of TStringList;
begin
setlength(arraylist,10);
for i:=0 to 9 do begin
arraylist[i] := TStringlist.create;
end;

....
slist := TStringList.create;
slist.add(...)
....

for i:=0 to 9 do begin
arraylist[i].AddStrings[slist];
end;

myclass := TMyClass.create(arraylist) // is it possible?
end;

type
TMyClass = class
public
constructor Create(obj: Array of TStringList)
  end
....



Relevant Pages