walkback - 海滨装饰师是启动时的新闻

时间:2017-12-06 13:27:44

标签: seaside dolphin-smalltalk

我正努力让自己更熟悉海豚海边。我已成功完成todo应用程序。现在我已经使用todo应用程序作为指南开始了我自己的应用程序。

我在会话开始时得到了回溯(见下文)。我已经设置了类似于待办事项的应用程序。我注意到的一件事是,当我回到海边配置时,根类说" JCBYCBi ......"而不是" JCBYCBi ......",似乎说实体是在配置而不是CLASS。

欢迎任何帮助,

约翰

装饰     ^装饰内容< ==装饰isNil

addDecoration:aDecoration     "将aDecoration添加到接收器装饰链。回答添加的装饰。"

| previous current |
previous := nil.
current := self decoration.
[ current ~~ self and: [ self decoration: current shouldWrap: aDecoration ] ] whileTrue: [
    previous := current.
    current := current next ].
aDecoration setNext: current.
previous isNil
    ifTrue: [ self decoration: aDecoration ]
    ifFalse: [ previous setNext: aDecoration ].
^ aDecoration

createRoot     ^ self rootDecorationClasses         注入:self rootClass new         into:[:component:decorationClass |             零件                 addDecoration:decorationClass new;                 你自己]

0 个答案:

没有答案