Returns the character that is input from the keyboard. If UseArrows is
on then the inverse bar will appear in the current window for selecting
a choice.
Example:
Var Key
Repeat
Writeln( 'Press the <ESC> key to exit this program.' )
Key = ReadKey
Until Key = Esc
