Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!wuarchive!zaphod.mps.ohio-state.edu!usc!ucsd!ogicse!zephyr.ens.tek.com!vice!bobb From: bobb@vice.ICO.TEK.COM (Bob Beauchaine) Newsgroups: comp.lang.pascal Subject: Re: It would be convenient to have a TP UNDERLINE string function Message-ID: <5727@vice.ICO.TEK.COM> Date: 5 Sep 90 15:47:40 GMT References: <24397@adm.BRL.MIL> Reply-To: bobb@vice.ICO.TEK.COM (Bob Beauchaine) Organization: Tektronix, Inc., Beaverton, OR. Lines: 23 In article <24397@adm.BRL.MIL> J_SCHULL@acc.haverford.edu (Jonathan Schull) writes: > >that would let you write lines like, > >WRITELN('I want to underline ',UNDERLINE('this phrase,'),' not this one'); > >The function would access WhereX and WhereY, set the text >attributes at the appropriate locations [BUT WHERE and HOW??????], >and then return the string argument unchanged, to be serviced by >the writeln statement. > >Does anyone know the appropriate magic? Unless you're going to use EGA or VGA and create your own internal font, you've got an impossible task. The standard IBM character set is the default for all text modes, and doesn't allow for underlined characters. There are ways to do what you want (with the appropriate monitor), but nothing as simple as you seem to think is possible. Sorry, Bob Beauchaine