HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2015
1027
Mituki (Googleから)再生位置・・・3解決


Mituki (Googleから)

リンク

2015/10/27(Tue) 18:44:59|NO.72553

現在、MediaPlayerを作っています。

//--File読込--// //---準備---_I// onexit goto *endoption buffer 2 syscolor 12:boxf color 0,0,0 mes "*Play" buffer 3 syscolor 12:boxf color 0,0,0 mes "*ProgramEnd" //---準備---_O// //ラベル設定_I// *startmenu //ラベル設定_O// //---開始---_I// gsel 0,1 title "Mediaplayer Ver126" syscolor 15:boxf pos 50,50 color 100,100,100 font "",30 mes "Media Player Ver 1.2.6" objimage 2 objsize 100,20 button "",*select_on objimage 3 objsize 100,20 button "",*endoption stop *select_on goto *plays stop *endoption dialog "終了しますか?",3,"MediaPlayer" if stat=6 :end if stat=7 :stop stop *plays dialog "",16 if stat = 0 : stop syscolor 15:boxf color 100,100,100 pos 0,0 mes "Media Player Ver 1.2.6" clrobj fname=refstr
なのですが、悩みがあるんです。
48行目から、
現在の時間の位置> 00:35/2:00 <全体の時間
このようにしたいんです。
Yahoo!で検索しても
ググっても、でません。
どうすれば、できますか?



この記事に返信する


pumpkin

リンク

2015/10/27(Tue) 19:08:51|NO.72562

//ファイルを開く
dialog "",16 music="\""+refstr+"\"" mci "open "+music+" alias music" //全体の長さを取得 mci "status music length" endtimea=stat/1000/60 //分 endtimeb=stat/1000\60 //秒 //再生 mci "play music" //リピート開始 repeat redraw 0 color 255,255,255 :boxf //現在の長さを取得 mci "status music position" nowtimea=stat/1000/60 //分 nowtimeb=stat/1000\60 //秒 //描画 color 0,0,0 : pos 0,0 mes ""+nowtimea+" ; "+nowtimeb+" / "+endtimea+" ; "+endtimeb redraw 1 wait 1 loop
とりあえずこんなサンプル作りました
mciのコマンドに曲全体の長さと現在の再生位置を取得するコマンドがあります

http://www.e-douguya.com/eq/tech/mci.shtml
個人的にこのサイトが一番詳しくて分かりやすい…



Mituki (Googleから)

リンク

2015/10/27(Tue) 19:12:13|NO.72563

ありがとうございます!!
解決とさせていただきます!



Mituki (Googleから)

リンク

2015/10/27(Tue) 19:12:41|NO.72564

pumpkinさん、いつもお世話になってます!
:)



ONION software Copyright 1997-2023(c) All rights reserved.