Konsolenanwendung Eingabe lesen bis EOF

[MisterNiceGuy]

Hi, ich habe gerade eine Konsolenanwendung geschrieben und möchte die komplette Eingabe mit Read() lesen.
Ich dachte erst, dass folgender Code die Lösung wäre:

Delphi-Quellcode:

var c:char;
begin
while not eof do read(c);
end.

Hier wird zwar jedes Zeichen eingelesen, das Programm aber nicht beendet.
Was mache ich falsch?

[mkinzler]

Du liest auch nicht aus der Datei

[MisterNiceGuy]

Nein, ich lese ja aus der Eingabe in der Konsole.

[mkinzler]

Stdin hat aber keine Dateiende (EOF)
Meinst du eine Zeile? -> ReadLn(c);

[MisterNiceGuy]

Oh wenns kein EOF hätte wärs ja fatal... nein ich lese Zeichen für Zeichen!
Wie könnte ich sonst rausbekommen wann ich mit Lesen fertig bin?

[mkinzler]

Nein, wenn alle Zeichen gelesen sind, wird auf erneute Eingabe gewartet.

[sx2008]

Hast du auch Strg+Z oder die F6-Taste gedrückt, um dem Eingabestrom ein Eof zu verpassen?

[MisterNiceGuy]

Ohje doof... Ne der User soll nix drücken, nur eine Eingabe machen. Aber ich lös das jetzt anders über Einlesen einer Daten, danke für eure Hilfe

[Zacherl]

Ein VK_RETURN z.b könnte auch als Abbruchbedingung verwendet werden.