Datei öffnen

[Chemiker]

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