More ... | Edit History:DiffChanges of Media Player 6.4 since Epoch
- Media Player 6.4の機能を呼び出してみる。 - - - [[$$toc]] - - →[[HSP3・サンプルスクリプト]]に戻る - - ---- - - HSP3.1β2 XPsp2 で動作確認 (3.0a以降です。)~% - オートメーション対応。~% - - - * スクリプト - {{{ - ; <<<< HSP 3.1β2 サンプル >>>> - ; - ; Media Player 6.4の機能を呼び出してみる - ; - - onexit gosub *exit - - screen 0,640,500 - title "mediaplayer" - - objsize 50,20 - - pos 0,0 : button gosub "OPEN" , *go1 - - pos 0,20 - axobj pmedia,"mediaplayer.mediaplayer",640,480 : axid=stat - - stop - - *go1 - sdim path,1024 - - dialog "mpg;*.avi;*.wmv;*.ram",16,"Movie" - if stat == 0 { goto *exit} - path = refstr - - wait 4 - - pmedia("FileName")=path - - return - - *exit - delcom pmedia : pmedia=0 - end - - }}} - * memo~% - 2006/04/08 14:01:34 JST~% - 変更~% - onexit *exit -> onexit gosub *exit - - |