View this PageEdit this PageAttachments to this PageHistory of this PageHomeRecent ChangesSearch the SwikiHelp Guide

funfunfun 8

▲PREV　------　●　TOP　●　------　NEXT▼Uploaded Image: fmrph.jpg

モーフにお絵描きだす

今度はモーフに描画してみたいとおもうです。
これでいろいろな見た目のモーフを作ることができるんじゃないでしょうかいなっと。

■クラスを作る

今度は親のクラスは「Morph」にします。
これはさきほどの「EllipseMorph」や「RectangleMorph」の
それまた親のクラスでおます。
「Object」を「Morph」に、「NameOfSubclass」を「TestMorph3」にします。
どうせテストだから、もうどんどんクラス作っちゃうぞ〜！！
--------------------------------------------
Morph subclass: #TestMorph3
	instanceVariableNames: ''
	classVariableNames: ''
	poolDictionaries: ''
	category: 'MyMorph'
--------------------------------------------
もちろんアクセプト〜ッ！！

Alt + s ( Cmd + s )

Uploaded Image: image21.jpg


■インスタンスを出す

Workspaceに以下のコードを書いてドゥ〜イ〜ット！！
--------------------------------------------

TestMorph3 new openInWorld

--------------------------------------------

Alt + d ( Cmd + d )

Uploaded Image: image22.jpg


これが「Morph」のインスタンスやね！！
「四角形」の枠線なし色違い（濃いブルー）やね。

Uploaded Image: image23.jpg


■メソッドを追加

「メソッドカテゴリペイン」の「as yet unclassified」という項目をクリックして
「ソースコードペイン」のテンプレートを以下のソースコードと入れ替えます。

Uploaded Image: image24.jpg


ここでは大きさだけ設定します。
--------------------------------------------
initialize
	super initialize.
	self extent: 100@100.
--------------------------------------------

Uploaded Image: zu2.jpg

忘れずにアクセプト〜ッ!!

Alt + s ( Cmd + s )

Uploaded Image: image25.jpg

■インスタンスを出す

Workspaceに以下のコードを書いてドゥ〜イ〜ット！！
--------------------------------------------

TestMorph3 new openInWorld

--------------------------------------------

Alt + d ( Cmd + d )


うん、大きさだけ変わってますな。

Uploaded Image: image26.jpg



▲PREV　------　●　TOP　●　------　NEXT▼







■　MEMO　■

Links to this Page