Einzelnen Beitrag anzeigen

Benutzerbild von maximov
maximov

Registriert seit: 2. Okt 2003
Ort: Hamburg
548 Beiträge
 
Delphi 2005 Professional
 
#5

Re: Array als Datei speichern

  Alt 12. Jan 2004, 23:37
@H4ndy: Wers möglichst dirty und nicht binär haben will, der soll es so machen, wie du vorschlägst


Zitat von hummer:
Danke schonmal.
Das Array ist eindimensional und statisch.

Und wie lese ich das Array jetzt wieder aus?
ungefähr so:

Delphi-Quellcode:
var fs:TFileStream;
    arr:array[0..99] od integer;
...

if fileExists('c:\array.dat') then
begin
  fs:=TFileStream.create('c:\array.dat',fmOpenRead);
  try
    if fs.size >= sizeOf(arr)
    then fs.read(arr,sizeOf(arr));
  finally
    fs.free;
  end;
end else showMessage('foobar not da');
cu.
mâxîmôv.

{KDT}
  Mit Zitat antworten Zitat