Zitat von
xZise:
Aber daran wirds doch wohl kaum liegen oder?
Da bin ich anderer Meinung.
Delphi-Quellcode:
type
TGrid = array of array of SmallInt;
var
Grid : TGrid;
begin
SetLength (Grid, 10, 20);
end;
Im obigen Beispiel ist Grid ein
Zeiger auf ein Array mit 10
Zeigern auf jeweils ein Array mit 20 SmallInt-Elementen. In Wirklichkeit sind noch einige Verwaltungsdaten dabei, das tut aber nichts zur Sache.
SizeOf(TGrid) wird immer den Wert 4 liefern - die Größe eines Zeigers.
Mit dem FillChar-Befehl in deinem Code löschst du nicht den Inhalt des Arrays, sondern einen Teil der Zeigerstruktur bzw. der Verwaltungsinformationen. Dies muß früher oder später zum Absturz führen.
Gruß Hawkeye