[comp.lang.pascal] Need quick check for presence of VGA

mfontana@eniac.seas.upenn.edu (Mark A Fontana) (11/25/90)

    I've written a program that uses features of the VGA adaptor but never
switches out of a standard 80x25 text mode.  The program is in TP 5.5.
Rather than bother with Detect, GraphResult, etc...

...could someone please e-mail a simple BOOLEAN expression that will 
indicate whether a VGA adaptor is present?  If possible, I would like
a similar expression for EGA.
  
For example:        VAR VGApresent, EGApresent: BOOLEAN;
                    VGApresent:= ?
                    EGApresent:= ?

Or if someone could tell me how to call INT $10 and get this info, that
would be just as good.

Thanks!
Mark Fontana

.------------------------------------------------------------------.
| Mark A. Fontana               |  "Have yourself a merry    .:.   |
| mfontana@eniac.seas.upenn.edu |     little Christmas.."   .:::.  |
`-------------------------------------------------------------"----'