【2.61】HSP初質P56【3.2β2】
レス数が900を超えています。1000を超えると表示できなくなるよ。
0904デフォルトの名無しさん
2009/10/21(水) 22:40:14＞HPバー
見た目を取りあえず気にしないのであれば…
pos 5,5
winobj "msctls_progress32","",, 0x50000000|0x1, 200, 32
hProgress = objinfo(stat,2)
sendmsg hProgress,0x406,0,200
repeat
a = cnt \ 201
sendmsg hProgress,0x402,a
title str(a)
await 10
loop
こんな感じ？
レス数が900を超えています。1000を超えると表示できなくなるよ。