Zitat:
Delphi-Quellcode:
begin
Assign(con, 'con');
Rewrite(con);
Writeln(con, 'Bitte geben Sie die Anzahl der Gäste ein:');
ReadLn(con, n);
CloseFile(con);
end.
Rewrite öffnet die Datei zum Schreiben.
Reset würde die Datei zum lesen öffnen.
Delphi-Quellcode:
Assign(con, 'con');
Rewrite(con);
Writeln(con, 'Bitte geben Sie die Anzahl der Gäste ein:');
CloseFile(con);
Reset(con);
ReadLn(con, n);
CloseFile(con);
Und wenn Du aus dem Textfile liest, kannst Du nur Strings auslesen.
Wenn Du Integer haben willst, musst Du den String konvertieren (strtoInt).
Vielleicht schreibst Du nochwas Du überhaupt machen willst.
Ich habe fast den Eindruck Du willst etwas auf dem Bildschirm ausgeben
und von dort etwas einlesen?
Grüße
Klaus