Moin Matrix Scripter,
hier mal ein Beispiel mit einer Textdatei:
Delphi-Quellcode:
var
F: Text;
begin
Assign(F, SomeFileName);
{I-}
ReWrite(F);
{I+}
if IOResult = 0 then
begin
Writeln(F, 'Dies ist ein Text.');
Writeln(F, 'Und dies ist eine zweite Zeile');
end;
Close(F);
end;
Wichtig: ReWrite loescht den aktuellen Inhalt der Datei. Zum Lesen musst du anstatt ReWrite() einfach Reset() verwenden, wenn du was an die Datei anhaengen willst, gibst Append().
Greetz
alcaeus