HSPTV!掲示板

mciを使って、動画を途中から再生させたのですが、その時に動画を再生させるためのウィンドウが
新しく開かれました。
今度は、その新しいウィンドウをフルスクリーン（ウィンドウの枠なしで）表示させたいのですが、
うまくいきません。
今作っているスクリプトは、以下のようになっています。

bgscr 0,640,480,,0,0:mouse -1:gsel 0,2
chgdisp 1
title"オリジナルシアター"
font"",60,16:color 255
mes"オリジナル動画を再生します"
　　　　 wait 500

bgscr 1,640,480,,0,0　;mciで動画用に新しく開かれるウィンドウを枠なしにする
gsel 0,-1　;今まで開いていたウィンドウを、非表示に
gsel 1,2　;新しいウィンドウを最前面に
mci "play original.mpg from 10000"; 動画を途中から再生
wait 30000
chgdisp
end

windowコマンドで再生先のウィンドウを指定してください。

#module
#deffunc mci_cleanup onexit
	mci "close all"
	return
#global

	bgscr 1, ginfo_dispx, ginfo_dispy, 0, 0, 0
	gsel 1, 2
	dialog "avi", 16
	if stat == 0 : end
	mci "open \"" + refstr + "\" alias movie"

	// ウィンドウの指定
	mci "window movie handle " + hwnd

	// 位置とサイズ設定
	mci "put movie destination at 0 0 " + ginfo_winx + " " + ginfo_winy
	
	mci "status movie length"
	mci "play movie from " + (stat / 2)
	stop

MCIリファレンス
http://msdn.microsoft.com/library/en-us/multimed/htm/_win32_multimedia_command_strings.asp
http://www.bekkoame.ne.jp/i/mr.manri/MCI/index.html

トンタンタンさんのスクリプトを僕の環境で実行しても何も起きませんでした。
同じやり方でこんなのがありますけど、どうでしょうか。

dialog "",16
a=refstr
bgscr 0,ginfo(20),ginfo(21),,0,0
mouse -1
mci "open \""+a+"\" alias son type mpegvideo style child parent "+hwnd
mci "put son window at 0 0 "+ginfo(20)+" "+ginfo(21)
mci "play son from 1000
wait 500
end

書き忘れてましたが終わるときは

mci "close all"

で終わらせてください

ありがとうございます。解決できました。
テスト期間に入ってしまって、返事が遅れてしまいました。すみませんでした。