Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!sdd.hp.com!elroy.jpl.nasa.gov!ncar!csn!boulder!spot.Colorado.EDU!vu From: vu@spot.Colorado.EDU (Vu~ Tua^'n Ha?i) Newsgroups: comp.lang.pascal Subject: Re: Ansi Color Message-ID: <1991Apr20.000525.28178@colorado.edu> Date: 20 Apr 91 00:05:25 GMT References: <1991Apr19.122136.1@tesla.njit.edu> <1991Apr19.165852.116@gnv.ifas.ufl.edu> Sender: news@colorado.edu (The Daily Planet) Organization: University of Colorado, Boulder Lines: 20 Nntp-Posting-Host: spot.colorado.edu In article <1991Apr19.165852.116@gnv.ifas.ufl.edu> sjs@gnv.ifas.ufl.edu writes: >In article <1991Apr19.122136.1@tesla.njit.edu>, fer9483@tesla.njit.edu writes: >> How di I print ANSI control codes from turbo pascal 5.5? >> like the code for a read foreground is: >> ESC [31m >> how do i print ut using writeln? >> Frank Rachel > >write (chr(27),'[31m'); I would like to add: do not use the crt unit since crt.write seems to write directly to the video buffer, which make the statement above doesn't work. Hai Vu -- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Hai Vu vu@spot.colorado.edu University of Colorado at Boulder ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~