HSPTV!掲示板

HSPでシークバーを作るとき、トラックバーを使って代用しているのですが、
これの動作がいまいち納得いきません。
というのも、適当な位置をクリックするとそこには飛ばず、
変なところへ飛んでいってしまうことがあるからです。
また同じところを何回もクリックすると、全然関係のないところへ
飛んでしまいます。

プレイヤーソフトではクリックしたところにきちんと移動します。
これを実装したいのですが、いい方法はないでしょうか?

一応以下のようにして設置しています。
※llmod3が必要です。HSPにllmod3がデフォルトで同梱されているバージョンのものを
　使うことをお勧めします。

#include "llmod3/llmod3.hsp"    ;この辺のパスは環境に合わせて変更して下さい
#include "llmod3/trackbox.hsp"

	;再生位置のトラックバーを設置
	pos 0,0:objsize 400,20,20
	trackbox WindowWidth,30,8|$10

トラックバー上でクリックするとダメですが
トラックバーの下をクリックすれば無理やりですがそれらしく・・・

#define trackbar(%1,%2,%3=50) winobj "msctls_trackbar32", "", , $50000000 | $1, %1, %2:\
	hndTrkbar = objinfo (stat, 2):sendmsg hndTrkbar, $405, 1,%3
onclick *jump

objx=400:objy=20
objsize objx,objy,20
trackbar objx,objy,50
stop


*jump
mx=mousex;トラックバーの設置場所によって補正必要
bar=100*mx/objx
sendmsg hndTrkbar, $405, 1,bar

始めたばかりで、初心者の域を脱していない素人考えで、恐らくイレギュラーかもしれませんが...
knock2さんのを参考にしました。
環境によりID0のチックマーク位置が違うかもしれません。この辺はちょっと分かりません。

	winobj "msctls_trackbar32","",,$50000000,500,30
	hTrackbar = objinfo(stat, 2)
	sendmsg hTrackbar, $405, 1, 50
	sendmsg hTrackbar, $415, 0,0;クリックの瞬間、移動させない為ページサイズを0にする
	oncmd gosub *hscroll, $114
	stop

*hscroll
	if lparam = hTrackbar {
		mx=ginfo_mx-ginfo_wx1-15;チックマークのスタート位置(15px)
		bar=100*mx/470;スタート、エンドのチックマークの間隔(470px)
		sendmsg hTrackbar, $405, 1, bar
	}
	return

あっそうか、oncmd でしたね。
ぽこみちさんのほうがいいですね。

お二人とも回答ありがとうございます。
かなり正確に操作できるようになりました。

＞＞環境によりID0のチックマーク位置が違うかもしれません。
これはpgetあたりを使って、色が変わっている位置を調べて
計算すればなんとかなると思います。

これにて解決とします。