5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

ΨΨΨ Smalltalk/ Squeak 教えろゴルァ ΨΨΨ

240 :作ってみたよ:01/10/30 14:36
結果が Transcript show: なのがちと残念。
OKボタンのついたダイアログってどうやって出すんだっけ?

Janken class>>play
 "Janken play"
 | table player computer result |
 table := #((TIE WIN LOSE) (LOSE TIE WIN) (WIN LOSE TIE)).
 player := (PopUpMenu labelArray: #(GU CHOKI PAR) lines: #())
    startUpWithCaption: 'What is your choice?'.
 computer := 3 atRandom.
 result := (table at: player) at: computer.
 Transcript show: result; cr.

232 KB
■ このスレッドは過去ログ倉庫に格納されています

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)