Thema: Delphi Datei öffnen

Einzelnen Beitrag anzeigen

Benutzerbild von Chemiker
Chemiker

Registriert seit: 14. Aug 2005
1.859 Beiträge
 
Delphi 11 Alexandria
 
#10

Re: Datei öffnen

  Alt 4. Mär 2007, 19:35
Hallo divBy0,

herzlich Willkommen im Forum.

Du könntest das Reset (datei) durch Append (datei) ersetzen dann müsste es funkt..

Delphi-Quellcode:
 if not FileExists('Filme.txt') then
  begin
    Rewrite(datei);
    ShowMessage('Datei war nicht vorhanden, wurde aber erstellt...');
  end
  else
  begin
    Append(datei); <--- Ändern
{    Reset(datei); }  
  end;
mfg
Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.
  Mit Zitat antworten Zitat