On Tue, 04 Nov 2008 05:05:26 -0800, Andreas Davour <[EMAIL PROTECTED]>  
wrote:

> Elliot is indeed right. A predicate is not supposed to be settable, it
> just returns t or nil (or maybe a type-something, yes). I do have
> feelings about it.

OK.

- To set/test status:

(alpha-enabled-p *surface*)
(pixel-alpha-enabled-p *surface*)
(color-key-enabled-p *surface*)
(rle-accel-enabled-p *surface*)

(setf (enable-alpha *surface*) T/NIL)
(setf (enable-pixel-alpha *surface*) T/NIL)
(setf (enable-color-key *surface*) T/NIL)
(setf (enable-rle-accel *surface*) T/NIL)

- To set/get the value of:

(alpha *surface*)
(color-key *surface*)

(setf (alpha *surface*) 0-255)
(setf (color-key *surface*) *color*)

_______________________________________________
application-builder mailing list
application-builder@lispniks.com
http://www.lispniks.com/mailman/listinfo/application-builder

Reply via email to