HSPTV!掲示板

dialog命令で、一度に複数ダイアログを表示させたいのですが...
全く分かりません。誰か助けてください...

こちらが参考になるかもしれません。
http://hsp.tv/play/pforum.php?mode=pastwch&num=70227

別のダイアログを表示させるexeを作ってexecする方法があります。

;別のexeの方
gsel 0,-1
dialog "^o^o^"
end

;メインソース
exec "(exeの名前).exe"
exec "(exeの名前).exe"
exec "(exeの名前).exe"

しかし一瞬大きなウィンドウが表示されます。
もう一つの方法がウィンドウタイマーを使います。
ソースはググれば出ると思う。

>>84786

大きいウィンドウは
#packopt hide 1
で解決できそう

vbscriptを使った方法もあります。

;改行するには\"&vbcr&\"と入れてください。
vbs={"
msgbox \"メッセージ\"&vbcr&\"Message\",64,\"タイトル\"
"}
notesel vbs
notesave dir_cur+"\\msgbox.vbs"
exec dir_cur+"\\msgbox.vbs",16
wait 50
delete dir_cur+"\\msgbox.vbs"
dialog "メッセージ\nMessage",,"タイトル"

これで多分いけると思う。

vbsを作ってexecで起動したあとdelete命令で消すのはどうですか？

a="msgbox \"ダイアログです\",64,\"ダイヤログ\""
repeat 10
  notesel a
  notesave "dialogtmp.vbs"
  exec "dialogtmp.vbs",16                            //,16がないとエラーになる
  delete "dialogtmp.vbs"
loop

追記
delete "dialogtmp.vbs"をloopの外に出してloopの中にwait を入れておかないとダメでした。すいません.

若干趣旨が異なるかもしれませんが......
「疑似ダイアログ」を作って各ウィンドウに描画し全てをgselで伏せておいて、
特定のアクションで表示させれば「ほぼ同時」に表示できますね。

#uselib "user32.dll"
#func SetTimer  "SetTimer"  int,int,int,int
#func KillTimer "KillTimer" int,int
#func EndDialog "EndDialog" int,int

#define WM_TIMER    0x0113	;Oncmd用
#define TIMER_ID    1	;タイマーのID
#define DIALOG_MAX 6	;ダイアログを表示する最大画面数

Frag=0	;作成したダイアログのカウント用
oncmd gosub *OnTimer, WM_TIMER	;割り込み登録
SetTimer hwnd,TIMER_ID,30	;タイマー登録
stop

*OnTimer
if wparam = TIMER_ID{
	Frag++
	if Frag>DIALOG_MAX-1{	;上限に達したらタイマーを破棄する
		KillTimer hwnd,TIMER_ID	;タイマー破棄
	}
	dialog Frag
}
return

いっそのことWindowタイマーを使用してみる手もありかもしれないです。
ウィンドウをドラッグ中でも描画されるという例のあれです。
参考：http://chokuto.ifdef.jp/advanced/usertimer.html