Danke erst mal für die nette Begrüßung und eure Antworten.
Hier kommt der Quelltext, in dem ich die Datei einlese:
Delphi-Quellcode:
Procedure RomEinlesen(Datei: String);
type
TDatenBytes = array[0..1048576] of Byte;
var
DatenBytes: TDatenBytes;
i: Integer;
DateiGr: Integer;
begin
DateiGr:=FileSize(Datei);
Form1.Edit1.Text:=IntToStr(DateiGr);
with TFileStream.Create(Datei, fmOpenRead) do
try
Read(DatenBytes, SizeOf(DatenBytes));
finally
Free;
end;
//Die gelesenen Bytes zur Kontrolle in einer ListBox ausgeben
for i:=0 to 1048576 do
Form1.ListBox1.AddItem(IntToStr(DatenBytes[i]),nil);
end;
Ich hab hier mal ein statisches Array benutzt, aber auch wenn ich ein dynamisches verwende erhalte ich einen Laufzeitfehler (aber keinen Stapel-Überlauf)