ja, also ich hab mir folgende klasse definiert:
Delphi-Quellcode:
TGroup = object
Member:TStringList;
Name: string;
end;
object weil ich es nicht von TComponent ableiten will
nun möchte ich eine create-procedure schreiben...
wie?
Delphi-Quellcode:
procedure TGroup.Create(MyGroup:TGroup);
begin
MyGroup.Member.Create;
end;
//deklaration:
Allys: Array[1..100] of TGroup;
//aufruf
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
for i:=1 to 100 do Allys[i].Create(Allys[i]);
end;
aber irgendwie funzt das nicht
wie muss ich das machen?