Schön, aber wie ihr sehen könnt, bin ich 14 Jahre alt
Die Delphi - Hilfe ist Englisch. Zwr bin ich in der 9.Klasse auf dem Gymnasium und habe jedes Halbjahr eine 1 oder 2 auf dem Zeugnis *angeb* , aber ich verstehe keine spezifischen Ausdrücke, die z.T. noch nicht einmal im Langenscheidt Lexikon stehen
Edit:
Geht das auch?
Delphi-Quellcode:
var
datei, datei2: textfile;
begin
if fileexists('Eintrage.txt') then
begin
assignfile(datei2,'Eintrage.txt'); //Das ist die Index-Datei
append(datei2);
writeln(datei2, edit1.text+' '+edit2.text+'.txt') //Daraus setzt sich der Dateiname zusammen
closefile(datei2);
end
else
begin
assignfile(datei,'Eintrage.txt'); //Das ist die Index-Datei
rewrite(datei);
writeln(datei, edit1.text+' '+edit2.text+'.txt') //Daraus setzt sich der Dateiname zusammen
closefile(datei);
end;
end;