Moin Sora,
erst einmal herzlich willkommen hier in der Delphi-PRAXiS.
Ich hab' mir jetzt nicht den ganzen Code durchgelesen, aber das hier
Delphi-Quellcode:
constructor TWorld.Create(AOwner: TComponent);
begin
inherited;
Self.list.Create(Self); // <== die Zeile meine ich
end;
muss schiefgehen. Probier's mal so:
Delphi-Quellcode:
constructor TWorld.Create(AOwner: TComponent);
begin
inherited;
Self.list := TComponentList.Create(Self);
end;