[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: color graphics in MCL
- To: email@example.com (Glenn Iba), firstname.lastname@example.org
- Subject: Re: color graphics in MCL
- From: email@example.com (Bill St. Clair)
- Date: Mon, 26 Sep 1994 19:04:50 -0400
At 6:32 PM 9/26/94 -0600, Glenn Iba wrote:
>In using the built in colors (e.g. *red-color*, *orange-color*)
>I find that some pairs of colors are indistinguishable on
>my monitor (specifically red = orange, and blue = purple).
>This happens both at home (Quadra 660av, NEC 3V monitor) and
>at work (Mac IIfx, NEC MultiSync 6FGp).
>Here's the kind of code I'm running, in case it yields a clue
>to the problem:
>(setf mywin (make-instance 'window :window-title "mywin"))
> (with-fore-color *orange-color*
> (paint-rect mywin 0 0 120 120)))
This is a FAQ. The default window can display only the 8 original
QuickDraw colors. You need to create a Color QuickDraw window by
passing a true value for the :color-p initarg to window:
(setf mywin (make-instance 'window :window-title "mywin"