Readln Problem

[marabu]

Oder so:

Delphi-Quellcode:

// uses Windows;

procedure FlushKeys;
begin
  FlushConsoleInputBuffer(GetStdHandle(STD_INPUT_HANDLE));
end;

Grüße vom marabu