speicherproblem

[Klaus01]

Sollte es nicht so gehen?

Delphi-Quellcode:

type
  MyArray = array[1..10,1..10] of String[255];  // ein Type erstellen

var
  MyFile: File of MyArray   // ein File mit dieser Typenstruktur
  dataSet : MyArray;        // ein DatenSatz

begin
  Assign(MyFile,'MyArrayFile.dat');  // dem logischen File eine "physikalische" Datei zurordnen.
  Rewrite(MyFile);                   // die Datei wird erstellt, sollte es schon eine mit diesem Namen geben
                                     // wird sie überschrieben   
  dataSet[1,2]:=test;                
  ....
  Write(MyFile,DataSet);             // Das Array wird in die Datei geschrieben
  CloseFile(MyFile);                 // Die Datei wird geschlossen.

  // zum Lesen öffnen
  reset(MyFile);
  Read(MyFile,dataSet);
  CloseFile(MyFile);

...
end;

Grüße
Klaus