Article View: comp.os.msdos.programmer
Article #4875Re: Turbo Pascal Keyboard Scanning
From: Eric Bergman-Terrell
Date: Mon, 25 Feb 1991 15:13
Date: Mon, 25 Feb 1991 15:13
24 lines
724 bytes
724 bytes
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
Technical Details
Message-ID:
<1991Feb25.151330.15356@isis.cs.du.edu>Path:
arc1-ca.pugleaf.net!utzoo!mnetor!tmsoft!torsqnt!news-server.csri.toronto.edu!cs.utexas.edu!uunet!isis!ebergmanReferences:
<1991Feb21.003344.13013@contact.uucp>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!mnetor!tmsoft!torsqnt!news-server.csri.toronto.edu!cs.utexas.edu!uunet!isis!ebergman From: ebergman@isis.cs.du.edu (Eric Bergman-Terrell) Newsgroups: comp.os.msdos.programmer,comp.sys.ibm.pc.misc Subject: Re: Turbo Pascal Keyboard Scanning Message-ID: <1991Feb25.151330.15356@isis.cs.du.edu> Date: 25 Feb 91 15:13:30 GMT References: <1991Feb21.003344.13013@contact.uucp> Reply-To: ebergman@isis.UUCP (Eric Bergman-Terrell) Distribution: na Organization: Math/CS, University of Denver Lines: 24