Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!cs.utexas.edu!rutgers!cmcl2!adm!xadmx!swbatl!texbell!utafll!john@uunet.uu.net
From: swbatl!texbell!utafll!john@uunet.uu.net (John Baima)
Newsgroups: comp.lang.pascal
Subject: Clearing the keyboard buffer
Message-ID: <21042@adm.BRL.MIL>
Date: 4 Oct 89 01:14:50 GMT
Sender: news@adm.BRL.MIL
Lines: 10

RE: Clearing the keyboard buffer.

Using Readln is a poor solution, I think because the program will stop
if nothing has been typed. The solution I usually use is something
like:

While KeyPressed do ch := ReadKey;

John Baima
texbell!utafll!john