Keine 0 schreiben, aber lesen! o.O

[Neutral General]

Hi,

Ich speichere ein paar Daten mit Hilfe eines Streams ab.
Map.MapPlan[x] bzw TexID dürfen nie 0 sein!

Delphi-Quellcode:

MapPlan: Array of Cardinal;
TexID: Cardinal;

Speichern:

Delphi-Quellcode:

for i:= 0 to High(Map.MapPlan) do
begin
 if Map.MapPlan[i] = 0 then ShowMessage(IntToStr(i)); // Wird nie angezeigt => Keine 0 dabei
 Stream.Write(Map.MapPlan[i],SizeOf(Cardinal));
 ...
end;

Laden

Delphi-Quellcode:

for i:= 0 to High(Map.MapPlan) do
begin
  Stream.Read(TexID,SizeOf(Cardinal));
  if TexID = 0 then ShowMessage(IntToStr(i)); // BAAM Es wird ne 0 gelesen o.O
  ...
end;

Wie kann das sein, dass ich ne 0 rauslese wenn ich nie eine reinschreibe ? -.-

Gruß
Neutral General