Witam mam taki kod:
PSerwer = ^TSerwer;
TSerwer = record
Host:string;
Nazwa:string;
Predkosc:integer;
DebrisObrony:integer;
DebrisFloty:integer;
ACS:boolean;
end;
TListaSerwerow = class (TObject)
private
FListTab: array of PSerwer;
procedure DodajSerwer();
public
constructor Create(NazwaPliku:string);
destructor Destroy; override;
end;
oraz w konstruktorze chce przydzielić tej tablicy FListTab jakiś rozmiar dobie to w ten sposób:
SetLength(FListTab,500);
i otrzymuje AV.
Bez klasy jeśli zadeklaruje FListTab jako zmienna lokalna wszystko jest cacy. Dlaczego tak się dzieje?