home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / pascal / 6378 < prev    next >
Encoding:
Internet Message Format  |  1992-11-07  |  996 b 
  1. Path: sparky!uunet!destroyer!gatech!prism!gtd205a
  2. From: gtd205a@prism.gatech.EDU (James Houghton Crouch)
  3. Newsgroups: comp.lang.pascal
  4. Subject: Re: reading alternate keys on ibm from turbo
  5. Message-ID: <73862@hydra.gatech.EDU>
  6. Date: 6 Nov 92 12:54:49 GMT
  7. References: <1dbruiINNbai@uwm.edu>
  8. Distribution: usa
  9. Organization: Georgia Institute of Technology
  10. Lines: 19
  11.  
  12. >procedure keyread (var ch: char; var alt: boolean);
  13. >  begin
  14. >    ch:= readkey;
  15. >    alt:= (ch=#0) and keypressed;
  16. >    if alt then ch:= readkey;
  17. >  end;
  18.  
  19. I think that this program will also return the arrow
  20. keys, PageUp, PageDown, and quite a few others.  
  21.  
  22. I'm pretty sure that TP firsts reads a #0 and then a code for these keys
  23. too
  24.  
  25.  
  26. -- 
  27. _________________________________________________________________________
  28. Hody Crouch     | Georgia Tech       | Internet: gtd205a@prism.gatech.edu
  29. Chemistry Major | Atlanta, GA 30332  | Snail Mail: 34353 GT Station
  30. ________________|____________________|___________________________________
  31.