omonuinen

以下の情報を参考にして、画像とスタイルについてはファイルを直接アクセスできるようにしました。

http://www.smalltalk.jp/pipermail/squeak-ja/2007-September/003596.html

特定のディレクトリ配下について直接アクセスできるように構成した上で、/seaside以下についてだけ別扱いするわけですね。

スタイルについては、以下の情報を参考にしてCSSファイルを読み込ませるようにしました。

http://book.seaside.st/book/in-action/serving-files/css-and-js?_s=mxO8zi4aDKIyxyg8&_k=epes78Um&_n&169

Seasideの使い方について書かれた本がウェブで読めるようになっています。

これから重宝しそうです。

http://book.seaside.st/book

入力項目を作りたいときにはvalue:を使わないとcallbackされないようです。代わりにwith:を使ったらcallbackされませんでした。違いはなんだろう。

html textInput size: 2;
maxLength: 2;
value: self data;
callback: [:value | self data: value]

htmlのコードを書くのに比べて固定的な表示内容を作るのは面倒ですが、データのやりとりとかインタラクティブな部分を作るのが圧倒的に楽です。

梅澤さんの「SeaSideへGO!!(第４回)」を参考にしながらOmniBaseの使い方を学んでいます。

例にならって、Dictionaryを登録してみました。

dbSession := SBOmniBaseAccessor default.
dbSession commitDo: [:tr |
(dbSession dictionaryNamed: 'myTest')
at: 'test' put: Dictionary new

ところが、こうやって登録した辞書にデータを加えてみてもうまくいきません。

dbSession := SBOmniBaseAccessor default.
dbSession commitDo: [:tr |
dic := (dbSession dictionaryNamed: 'myTest') at: 'test'.
dic at: 'name' put: 'itoh'.

上記のようなコードを評価した後で、以下のコードを評価してもインスペクタには空っぽのDictionaryが表示されます。

dbSession := SBOmniBaseAccessor default.
dbSession readDo: [:tr |
dic := (dbSession dictionaryNamed: 'myTest') at: 'test'.
dic inspect.

面倒ですが再度辞書を追加してみますが、結果は変わらず空っぽのままです。

dbSession := SBOmniBaseAccessor default.
dbSession commitDo: [:tr |
dic := (dbSession dictionaryNamed: 'myTest') at: 'test'.
dic at: 'name' put: 'itoh'.
(dbSession dictionaryNamed: 'myTest') at: 'test' put: dic.

この状態で２日間困ってしまいました。

結局、解決方法ですが以下のようにすれば良いことがわかりました。

dbSession := SBOmniBaseAccessor default.
dbSession commitDo: [:tr |
dic := (dbSession dictionaryNamed: 'myTest') at: 'test'.
dic at: 'name' put: 'itoh'.
dic markDirty.

気がついてみれば当然ですが、登録したオブジェクトに変更があったことを明示的に伝えないといけないんですね。

OmniBaseの学習は手探り状態で進んでいます。