[comp.lang.pascal] Ok, now I've got a real question

tpehrson@javelin.sim.es.com (Tim Clinkenpeel) (04/26/91)

key:=readkey; repeat until upcase(key) in ['ABHW'];

i get the error "ordinal expression expected" which, by the way, is my favorite
error message.  key:char;

i really need a decent text.  good thing i'm flat broke; i'll just plague c.l.p.
with my incessant questions in the meantime.

exceedingly grumpy persons need not respond (you know who you are).
-- 
   /=============================/ 
  / tpehrson@javelin.sim.es.com /      i will work for food 
 /=====aka: tim clinkenpeel====/ 
[DISCLAIMER: send SASE to: disclaimer, 84151-0521]

ebergman@isis.cs.du.edu (Eric Bergman-Terrell) (04/26/91)

You can't have a set of strings, only a set of ordinal values (e.g. characters).

Try this instead:

... [ 'A', 'E', 'I', 'O', 'U']

In other words, list the characters individually.


Terrell

phaethon@kontu.utu.fi (Timo Eronen, Space Research Laboratory, University of Turku, Finland.) (04/27/91)

In article <1991Apr26.002739.14842@javelin.sim.es.com>, tpehrson@javelin.sim.es.com (Tim Clinkenpeel) writes:
> 
> key:=readkey; repeat until upcase(key) in ['ABHW'];
> 
Try instead:
Repeat Until UpCase(ReadKey) In ['A','B','H','W'];

tke, phaethon@utu.fi

bobb@vice.ICO.TEK.COM (Bob Beauchaine) (04/27/91)

In article tpehrson@javelin.sim.es.com writes:
>
>
>i really need a decent text.  

  When all else fails, R.T.F.M.  Oh? You don't have one?

/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\ 

Bob Beauchaine bobb@vice.ICO.TEK.COM 

C: The language that combines the power of assembly language with the 
   flexibility of assembly language.