Zitat von
CPP-Programmer:
Zitat von
3_of_8:
So ists richtig:
Delphi-Quellcode:
var eingabetext: textfile;
str: String;
begin
assignfile(eingabetext,'C:\data.txt');
rewrite(eingabetext);
str:=edit1.text;
write(eingabetext, str);
closefile(eingabetext);
assignfile(eingabetext,'C:\data2.txt');
rewrite(eingabetext);
str:=edit2.text;
write(eingabetext, str);
closefile(eingabetext);
end;
Hab eher gemeint ob des so richtig ist, weil er mir immer einen e/o error ausgibt.