ebergman@isis.cs.du.edu (Eric Bergman-Terrell) (02/25/91)
How about: function key : char; var ch : char; begin ch := chr(0); if keypressed then ch := readkey; key := ch; end; Is that what you have in mind? Terrell