for VisualWorks 7.8 / 7.7 / 7.6 with Jun793
ラベルやフィールドやスライダーをウィンドウの中に出現させる練習をしましょう。以下のような赤と緑と青を混ぜた色をウィンドウの背景色とするアプリケーション「加法混色」を作成します。
|
どうぞ次のプログラムを実行してください。作成のための準備が整います。
| aCollection | (aCollection := OrderedCollection new) add: #url: -> 'http://www.cc.kyoto-su.ac.jp/~atsushi/Programs/VisualWorks/ColorRGB/ColorRGB.st'; add: #comment: -> 'Copyright 2008-2011 KSU (Kyoto Sangyo University). All Rights Reserved.'; add: #bundle: -> #KSU; add: #package: -> 'KSU-Template'; add: #nameSpace: -> #KSU; add: #category: -> 'KSU-Template'; add: #class: -> #{KSU.ColorRGB}; add: #protocol: -> #examples; add: #selector: -> #example1; add: #execute: -> [#{KSU.ColorRGB} value example1]; yourself. JunSystem perform: ((aCollection collect: [:each | each key]) inject: String new into: [:selector :key | selector , key]) asSymbol withArguments: (aCollection collect: [:each | each value]) asArray
|
インターフェースビルダ(GUI Canvas)やメニューエディタ(Menu Editor)などを用いて、すべてこしらえると…、以下のように赤と緑と青を混ぜて色を作り出せるようになります。これを加法混色と言います。オプションキーを押しながらスライダーを操作すると、赤と緑と青を同割合で混ぜることができ、グレースケールを見て取れるでしょう。
|
約300行のプログラミング(このドックレット出力を見ながら)、おきばりやしとくれやす!
for VisualWorks 7.8 / 7.7 / 7.6 with Jun793