08/11/28 06:40:55 y4dFkZfS0
>>557
"再生中の時間表示を、外部から抜き取る方法"ではありませんが、
現在の再生位置を算出するUWSCスクリプトを作りました。
非常に不満の残る方法ですが参考になれば幸いです。
Id0=GETID("TCPMP")
CTRLWIN(id0,ACTIVATE)
CLKITEM(ID0,"ファイル",CLK_TOOLBAR)
KBD(VK_DOWN);KBD(VK_DOWN);KBD(VK_DOWN);KBD(VK_DOWN)
KBD(VK_DOWN);KBD(VK_DOWN);KBD(VK_ENTER);SLEEP(1)
Id1=GETID(GET_ACTIVE_WIN)
GETITEM(Id1,ITM_STATIC,1)
CTRLWIN(id1,CLOSE)
Total=TOKEN(".",ALL_ITEM_LIST[5])
DIM Time[0]
i=-1
REPEAT
i=i+1
RESIZE(Time,i)
Time[i]=VAL(TOKEN(":",Total))
UNTIL Total=""
SELECT i
CASE 0;Play=Time[0]
CASE 1;Play=Time[0]*60+Time[1]
CASE 2;Play=Time[0]*3600+Time[1]*60+Time[2]
SELEND
Play=INT(Play*(VAL(SETSLIDER(Id0,GET_SLIDER,2))/29982))
MSGBOX(Play)