sample\hspdsp\sample03.hsp » Plain Format
// sample03.hsp HSPウィンドウ内で再生(リサイズ対応) #include "hspdsp.as" dsp_Init ; 初期化 gsel 0,-2 screen 1,ginfo_dispx,ginfo_dispy,0,,,640,480 dialog "*",16,"メディアファイル" if stat=0:end // システム標準のレンダラーで開く dsp_Open refstr,OPEN_DEFAULT_RENDERER,0,0,0 onexit *exit ; 終了時開放するため oncmd gosub *event_resize, 0x05 ;ウィンドウのリサイズ title "ウィンドウの大きさを変えられるよ♪" dsp_Play hwnd,0,0,640,480 ; 0,0 座標に 640x480 の大きさで表示 stop *exit dsp_Close ; メディアファイルを閉じる dsp_Exit ; 開放 end *event_resize //リサイズ時にこちらに飛びます dsp_Resize hwnd,0,0,ginfo(12),ginfo(13) return