ReadLn() für Fensterprogramme?

[automatix]

Oder:

Delphi-Quellcode:

while not EntertasteGedrueckt do
begin
  Sleep(50);
  Application.ProcessMessages;
end;