Einzelnen Beitrag anzeigen

fajac

Registriert seit: 1. Jul 2009
60 Beiträge
 
#3

Re: Anfänger - wie Zahlen zum rechnen in Datei speichern ?

  Alt 3. Jul 2009, 12:35
Delphi-Quellcode:
var
  fMyFile : file of Integer;
  fileName : string;
begin
  fileName := ...irgendwas
  AssignFile (fMyFile, fileName);
  if FileExists (fileName) then
    begin
      Reset (fMyFile);
      Seek (fMyFile, FileSize (fMyFile));
    end
  else
    rewrite (fMyFile);
  try
    BlockWrite (fMyFile, MyFile [1], 7);
  finally
    CloseFile (fMyFile);
  end;
end;
  Mit Zitat antworten Zitat