Einzelnen Beitrag anzeigen

Benutzerbild von buyden
buyden

Registriert seit: 10. Apr 2003
Ort: Schneeberg
228 Beiträge
 
Delphi 7 Enterprise
 
#1

Zeile an Ende von Textdatei anhängen

  Alt 8. Sep 2004, 17:13
Hallo erstmal,

ich hab ein kleines Problem beim Schreiben in eine Textdatei. Ich möchte in einer Textdatei einfach ans Ende eine Zeile anfügen.
Mit folgendem Code bekomme ich immer einen I/O Error103.
Delphi-Quellcode:
procedure TForm1.Button6Click(Sender: TObject);
var datei:textfile;
begin
assignfile(datei, datamodule2.table4.fieldbyname('pfad').asstring);

writeln(datei,inttostr(datamodule2.table4.fieldbyname('techniker').asinteger)+','+
dbedit1.text+',, 3');
closefile(datei);

end;
Kann mir jemand erklären, wo mein Fehler liegt??
Es gibt keine dummen Fragen, außer die von mir


MFG BUYDEN
  Mit Zitat antworten Zitat