Hallo,
Du musst zuvor aber irgendwie Dimensionen abspeichern, eventuell auch die Stringlänge, falls diese variabel ist.
Denn 10x5 String[x] belegen den gleichen Platz wie 5x10 String[x].
Also so ähnlich:
Delphi-Quellcode:
type
TFeldGroessen = record
Zeilen,
Spalte,
StringSize : integer;
//..
end;
var
Datei: TFileStream;
FeldGroessen : TFeldGroessen;
i: integer;
s: String[15];
begin
with FeldGroessen do
begin
Zeilen := high(Feld)-Low(Feld)+1;
Spalten := high(Feld[0])-Low(Feld[0])+1;
stringSize := SizeOf(s);//Obacht -> String[StringSize-1]
end;
Datei:= TFileStream.Create(<Dateiname>, fmOpenWrite);
Datei.WriteBuffer(FeldGroessen,SizeOf(FeldGroessen));
//Alle Zeilen nacheinander abspeichern -> Daten des tiefsten array sind die Spalten
For i := 0 to FeldGroessen.Zeilen-1 do
Datei.WriteBuffer(Feld[i], SpaltenZahl* SizeOf(s));
....
end;
Gruß Horst