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

マスクで遊ぶ

back

WarpBltでマスク処理に挑戦でするよ。


ソースコードを順番にドゥ〜イットしてみてください。
Alt + d ( Cmd + d )



■マスクして転送するです。


まずは、転送元用の画像をWebから読み込むです。
--------------------------------------------
srcFc _ HTTPSocket httpJpeg: 'http://www.languagegame.org:8080/zoo/uploads/popo.jpeg'.
--------------------------------------------


読み込んだ画像を表示するです。
--------------------------------------------
srcFc displayAt: 0@0
--------------------------------------------


お次に、マスク用としてフォームカンバスに楕円を描いたものを用意しまする。
--------------------------------------------
mskFc _ FormCanvas extent: srcFc extent.
mskFc fillColor: Color white.
mskFc fillOval: ((0@0) extent: srcFc extent) color: Color yellow.
--------------------------------------------


マスクを表示します。
--------------------------------------------
mskFc showAt: 200@0.
--------------------------------------------


転送っす。
--------------------------------------------
(BitBlt current toForm: srcFc) 
	copyForm: mskFc form
	to: 0@0
	rule: Form and
	colorMap: 
		(Bitmap with: 16rFFFFFFFF with: 0 ).

--------------------------------------------
転送した結果を表示してみるっす。
--------------------------------------------
srcFc displayAt: 150@200.
--------------------------------------------


黒い部分は透明のはず・・・。スケッチモーフにして確かめてみると・・・。
--------------------------------------------
sk _ SketchMorph withForm: srcFc form.
sk openInHand.
--------------------------------------------

おお！きりぬかれてまんな。ま、成功ってことじゃないでしょうか･・・・。＜おいおい！！




下の入力ボックスに書き込んで”add to the page”ボタンで登録出来ます。
修正したい場合はページ左のアイコンの”edit”で出てくる画面で編集可能です。
ページ左のアイコンの”uploads”で画像（JPEG,GIF,PNG）のアップロードもできます。

Link to this Page