home *** CD-ROM | disk | FTP | other *** search
- Path: sparky!uunet!ukma!gatech!nscf!lakes!kalki33!system
- From: system@kalki33.lakes.trenton.sc.us (Kalki Dasa)
- Newsgroups: comp.lang.pascal
- Subject: Text in graphics mode (TP 7.0)
- Message-ID: <Ju0XXB1w165w@kalki33.lakes.trenton.sc.us>
- Date: Mon, 25 Jan 93 15:38:18 EST
- Organization: Kalki's Infoline BBS, Aiken, SC, USA
- Lines: 47
-
-
- Problem:
-
- The OutTextXY procedure simply writes over whatever is in the area
- specified without erasing the previous contents. I'm trying to implement
- a "counter" display that shows numbers as they increase/decrease.
-
- Examples:
-
- OutTextXY(0,0,'oldstring'); {This doesn't work}
- OutTextXY(0,0,'newstring');
-
- 'newstring' is written over (apparently ORed with) 'oldstring' but
- 'oldstring' is not erased. The result is unreadable.
-
- OutTextXY(0,0,'oldstring');
- OutTextXY(0,0,' '); {This doesn't work either}
- OutTextXY(0,0,'newstring');
-
- The blank string is simply ORed with 'oldstring' and the result is the
- same as in the first example.
-
- SetColor(white);
- OutTextXY(0,0,'oldstring'); {Works, but too much flicker this way}
- OutTextXY(0,0,'newstring');
- SetColor(black);
- OutTextXY(0,0,'oldstring');
- OutTextXY(0,0,'newstring');
-
- I can do a SetViewPort...ClearViewport, but this also produces
- unacceptable flicker. The BitBlt constants in SetWriteMode do not work
- with text either.
-
- What's the best solution?
-
- Kalki Dasa
-
-
- ---------------------------------------------------------
- | Don't forget to chant: |
- | |
- | Hare Krishna Hare Krishna, Krishna Krishna Hare Hare |
- | Hare Rama Hare Rama, Rama Rama Hare Hare |
- | |
- | Kalki's Infoline BBS Aiken, South Carolina, USA |
- | (kalki@kalki33.lakes.trenton.sc.us) |
- ---------------------------------------------------------
-