Path: utzoo!utgpu!news-server.csri.toronto.edu!qucdn!spraggej Organization: Queen's University at Kingston Date: Friday, 26 Apr 1991 19:08:55 EDT From: John G. Spragge Message-ID: <91116.190856SPRAGGEJ@QUCDN.QueensU.CA> Newsgroups: comp.lang.pascal Subject: Re: Just disregard me References: <1991Apr26.003242.14942@javelin.sim.es.com> <91116.084010IO92203@MAINE.BITNET> In article <91116.084010IO92203@MAINE.BITNET>, IO92203@MAINE.BITNET (Scott Maxell) says: > >In article <1991Apr26.003242.14942@javelin.sim.es.com>, >tpehrson@javelin.sim.es.com (Tim Clinkenpeel) says: [ fiddle faddle deleted ] >>repeat while upcase(key) not in ['A','B','H','W']; >> >>i just knew it was syntax. however, i was once ploggin' through someone >>else's >>code and they had done something very similar without having to quote and >>comma >>but once (like my first example). memory is shady about this incident, so >i'd >>like to know if it's possible or they had writting a custom routine. >> > > What you probably saw was a set constructed as follows: > > LetSetType = ['A'..'Z']; > > Or something similar to that. Alternatively, our intrepid hacker may have seen: If POS (UpCase (ReadKbd), 'NQSR' <> 0 THEN CASE ... or something similar. "POS" will produce a result similar to that of a set manager, and in cases where you want to select from only a small number of characters, it's more efficient. disclaimer: Queen's University supplies me with computer services, not my opinions. John G. Spragge