Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!uunet!orca!javelin.sim.es.com!tpehrson From: tpehrson@javelin.sim.es.com (Tim Clinkenpeel) Newsgroups: comp.lang.pascal Subject: Re: wish i could figure this out for myself Message-ID: <1991May3.170232.7710@javelin.sim.es.com> Date: 3 May 91 17:02:32 GMT References: <1991May3.140719.5931@javelin.sim.es.com> <1991May3.150243.3793@e2big.mko.dec.com> Reply-To: tpehrson@javelin.sim.es.com Organization: Evans & Sutherland Computer Corp., Salt Lake City, Utah Lines: 20 granoff@vaxwrk.enet.dec.com (Mark H. Granoff) writes: >Close... Try something like this: >FUNCTION ValidChar(Ch:Char):Boolean; > CONST > ValidChars : SET OF Char = ['A'..'Z','a'..'z','0'..'9']; > BEGIN > ValidChar := Ch IN ValidChars; > END; yeah, i had considered doing it this way but i thought it was sloppy. besides, i really like to know how to do such a thing exclusively. in any event, thanks for your help. i may have to resort to using the above method (if nothing else turns up here on c.s.p) -- /=============================/ / tpehrson@javelin.sim.es.com / i will work for food /=====aka: tim clinkenpeel====/ [DISCLAIMER: send SASE to: disclaimer, 84151-0521]