On Thu, Mar 08, 2012 at 08:24:02AM +0100, Alexander Burger wrote:
>
> (gui '(+E/R +Chart) '(children : home obj) 5
> '((This) (list NIL This (: nm)))
> car )
> (<table> NIL NIL
> '(NIL (NIL "Class") (NIL "Name"))
> (do 6
> (<row> NIL
> (gui 1 '(+ChoButton) '(choMaster (field 1)))
> (gui 2 '(+ClassField) '(curr)
> '(("Armour" +Armour +Item) ("Weapon" +Weapon +Item )) )
> (gui 3 '(+TextField))
> (gui 4 '(+DelRowButton))
> (gui 5 '(+BubbleButton)) ) )
> (scroll 6 T)
Obvoiusly, '(: nm)' in the chart's get function should be '(: name)'.
Then, if you want the name to be editable in the chart, you can change
the above to
...
(gui '(+E/R +Chart) '(children : home obj) 5
'((This) (list NIL This This))
car )
...
'(("Armour" +Armour +Item) ("Weapon" +Weapon +Item )) )
(gui 3 '(+Obj +TextField) '(name +Master) 30)
(gui 4 '(+DelRowButton))
...
That is, you pass the object 'This' instead of just the name '(: name)'
to the chart field, and make the field an '+Obj' field (holding an
object instead of just plain text).
Cheers,
- Alex
--
UNSUBSCRIBE: mailto:[email protected]?subject=Unsubscribe
