[cells-devel] Celtk: Why can I place a label but not a rectangle with :parent-x and :parent-y ?

Frank Goenninger frgo at mac.com
Sat Dec 30 17:47:00 UTC 2006


Hi all you Celtk users:

In my quest to design a beautiful GUI for my app I try to place my  
widgets in the app window.

Therefore I try the following (part of Celtk-based code):

(defmodel app-window (window)
   ()
   (:default-initargs
       :width (c-in 1000)
       :height (c-in 600)
       :kids (c? (the-kids
                          (mk-rectangle
                             :tk-fill "grey"
                             :height 100
                             :width 200
                             :parent-y 100
                             :parent-x 100)))))

... which results in an error saying

:PARENT-Y :PARENT-X :HEIGHT are invalid initargs to make-instance of  
class
#<STANDARD-CLASS CTK:RECTANGLE>. The valid initargs are :DISABLEDWIDTH
:ACTIVEWIDTH :WIDTH :TAGS :STATE :DISABLEDSTIPPLE :ACTIVESTIPPLE
:STIPPLE :DISABLEDOUTLINESTIPPLE :ACTIVEOUTLINESTIPPLE :OUTLINESTIPPLE
:DISABLEDOUTLINE :ACTIVEOUTLINE :OUTLINE :OFFSET :DISABLEDFILL
:ACTIVEFILL :TK-FILL :DASHOFFSET :DISABLEDDASH :ACTIVEDASH :DASH
:DECORATIONS :COORDS :COORDS-TWEAK :L-COORDS :ID-NO :USER-ERRORS
:ON-KEY-UP :ON-KEY-DOWN :ON-COMMAND :TIMERS :TK-CLASS :MD-NAME :ID
:VALUE :AWAKEN-ON-INIT-P :FM-PARENT.
    [Condition of type PROGRAM-ERROR]

Hm - now, that means I can't really say I want a specific height for  
a rectangle?! Also, I can't place this rectangle... Trying this with  
a label works Ok. How can that be?

Any pointers really appreciated.

Frank



More information about the cells-devel mailing list