Registriert seit: 28. Mär 2003
Ort: Bonn
131 Beiträge
|
13. Mai 2003, 12: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
|