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

ウィンドウ

back


空間にウィンドウを出して、いろいろなものを表示したいっすよね。



■ウィンドウのみ

まずはただのウィンドウを表示するです。
----------------------------------------
win _ TWindow new.
space addChild: win.
----------------------------------------
Alt + d ( Cmd + d )

Uploaded Image: image14.jpg



■ミラーウィンドウ

おなじみのミラーウィンドウでござる。
----------------------------------------
win _ TWindow new.
prtl _ TPortal new.
win contents: prtl.
space addChild: win.
----------------------------------------
Alt + d ( Cmd + d )

Uploaded Image: image15.jpg



■Squeakウィンドウ

ウィンドウの中にSqueakのワールド。
----------------------------------------
tm _ TMorphic new initializeOpaque: true extent: 1024@768.
teaWorld _ TMorphMonitor new initializeWithWorld: 'Macintosh' extent: 1024@768.
teaWorld eventsTo: tm.
win _ TWindow new.
win contents: tm.
space addChild: win.
----------------------------------------
Alt + d ( Cmd + d )

Uploaded Image: image16.jpg



■画像貼り付け

ウィンドウに画像を貼り付けるです。
これはウィンドウが開いた状態のときね。(右上のアイコンが「−」状態)
----------------------------------------
pic _ TTexture
	new initializeWithFileName: 'GrnChplTwr.bmp'
	mipmap: true
	shrinkFit: false.
win _ TWindow new.
win contents: pic.
space addChild: win.
----------------------------------------
Alt + d ( Cmd + d )

Uploaded Image: image17.jpg


■画像貼り付け

ウィンドウが閉じた状態のとき。(右上のアイコンが「+」状態)
開くと別の絵を表示するです。
----------------------------------------
pic _ TTexture
	new initializeWithFileName: 'GrnChplTwr.bmp'
	mipmap: true
	shrinkFit: false.
win _ TWindow new.
win contents: pic.
pic _ TTexture
	new initializeWithFileName: 'KAY.bmp'
	mipmap: true
	shrinkFit: false.
win rectFront: pic.
space addChild: win.
win closeContents.
----------------------------------------
Alt + d ( Cmd + d )

Uploaded Image: image18.jpg






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


Sunday, 31 October 2004, 2:54:27 am

■Morphをウィンうに表示。太字のところのモーフ名を変えるだす。
--------------------------------------
morph _ BouncingAtomsMorph new.
morph beSticky.
tm _ TMorphic new initializeOpaque: true extent: 512@512.
teaWorld _ TMorphMonitor new initializeWithWorld: nil extent: 512@512.
teaWorld eventsTo: tm.

teaWorld world color: morph color.
teaWorld world addMorphCentered: morph.

win _ TWindow new.
win translationX: 0.0 y: 0.0 z: 0.0.
win rotationAroundY: 0.
win contents: tm.
win closeContents.
space addChild: win.
--------------------------------------


■Projectをウィンドウに表示。太字のところのプロジェクト名を変えるだす。
--------------------------------------
tm _ TMorphic new initializeOpaque: true extent: 1024@768.
teaWorld _ TMorphMonitor new initializeWithWorld: 'Squeak3.6' extent: 1024@768.
teaWorld eventsTo: tm.
win _ TWindow new.
win translationX: 0.0 y: 0.0 z: 0.0.
win contents: tm.
win closeContents.
space addChild: win.
--------------------------------------

ってなかんじね。--thoru

Link to this Page

  • Enjoy CROQUET last edited on 5 November 2022 at 11:40:11 am by localhost