Einzelnen Beitrag anzeigen

mjenke

Registriert seit: 28. Mär 2003
Ort: Bonn
131 Beiträge
 
#3
  Alt 13. Mai 2003, 11:59
Für eine einfache Textdatei beispielsweise so:

Delphi-Quellcode:
var
  Datei: TextFile;
  Dateiname: string;
begin
  Dateiname := 'c:\temp.txt';
  if not FileExists(Dateiname) then begin
    AssignFile(Datei,Dateiname);
    Rewrite(Datei);

    // Datei mit Inhalt füllen

    CloseFile(Datei);
  end;
end;

Matthias

[edit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]
Matthias Jenke
  Mit Zitat antworten Zitat