home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / comp / lang / lisp / mcl / 1340 < prev    next >
Encoding:
Internet Message Format  |  1992-08-29  |  1.9 KB
  1. Path: sparky!uunet!munnari.oz.au!yoyo.aarnet.edu.au!sirius.ucs.adelaide.edu.au!baldrick.medicine.adelaide.edu.au!mpradhan
  2. From: mpradhan@medicine.adelaide.edu.au (Malcolm Pradhan)
  3. Newsgroups: comp.lang.lisp.mcl
  4. Subject: Re: main-screen-color-p
  5. Message-ID: <8364@sirius.ucs.adelaide.edu.au>
  6. Date: 29 Aug 92 01:02:05 GMT
  7. References: <9208261535.AA13352@media-lab.mit.edu>
  8. Sender: news@ucs.adelaide.edu.au
  9. Organization: Faculty of Medicine, University of Adelaide
  10. Lines: 28
  11. Nntp-Posting-Host: baldrick.medicine.adelaide.edu.au
  12. X-UserAgent: Nuntius v1.1.1d9
  13. X-XXMessage-ID: <A6C50393D0013808@baldrick.medicine.adelaide.edu.au>
  14. X-XXDate: Sat, 29 Aug 92 18:36:03 GMT
  15.  
  16. In article <9208261535.AA13352@media-lab.mit.edu> Henry Lieberman,
  17. lieber@MEDIA-LAB.MEDIA.MIT.EDU writes:
  18. >Main-Screen-Color-P still doesn't do it, I'm afraid. 
  19. >On my machine, a color screen, it returns T, but when I set the
  20. >Monitors control panel to black-and-white, it still returns T.
  21. >
  22. >I think what most programs will want to know is whether color pixels
  23. >are actually reaching the user's retina, not if the screen has the
  24. >"capability" in some sense to do color display.
  25.  
  26.  I think the best way to check for colour is first to see if the Mac
  27. you're running on supports colour with Gestalt asking for
  28. gestaltQuickdrawFeatures, test the result for gestaltHasColor.
  29.  
  30.  Then get the main screens gDevice using GetMainDevice and check
  31. the current depth of the device by looking in the pixelSize field
  32. of its gdPMap (ie the graphics device pixel map).
  33.  
  34.  Sorry, I don't have any lisp code for this but it isn't hard.
  35.  
  36. Regards,
  37. Malcolm
  38. _________________________________________________________________
  39.     Malcolm Pradhan
  40.     Medical Computing, Faculty of Medicine         _--_|\
  41.     University of Adelaide, South Australia       /      \
  42.     InterNet: mpradhan@medicine.adelaide.edu.au   \_.--x_/
  43.     Fax: +618 223 2076  :x marks the spot:              v
  44.