Erst mal hallo , bin zwar neu hier, hab aber schon viele Beiträge hier gelesen.
Nun zu meinem Problem...
Mein Code :
Delphi-Quellcode:
type
TARR_Class = record
Obj : TLabel;
CL : string;
end;
...
var
ARR_Class : array of array of TARR_Class;
...
if CLExists = -1 then
begin
Max_X := length (ARR_Class);
setlength (ARR_Class, MAX_X+1 );
setlength (ARR_Class[Max_X],1 );
end
else
begin
Max_X := length (ARR_Class); //Hier meldet der debugger einer EAccessViolation
Max_Y := length (ARR_Class[MAX_X]);
setlength (ARR_Class[CLExists], Max_Y+1);
end;
ARR_Class [Max_X, MAX_Y-1].CL := FORMAT;
ARR_Class [Max_X, MAX_Y-1].obj := lblText;
end;
...
Es ist bestimmt nur ne Kleinigkeit die ich übersehen hab, hoff ich mal
Danke im voraus