スクロールバーを制御したい

スクロールバーを制御したいのですが、方法がわかりません。最後までスクロールしたり、最初にスクロールする方法を教えてください
SETSLIDER、GETSLIDERの関数を使うことによって解決します。

GETSLIDER
スライダーの状態を取得

SETSLIDER
スライダーの状態を設定

//スクロールする元となるメモ帳を立ち上げる
 LF = ""
FOR A = 1 TO 100
 LF = LF + "あ<#CR>"
NEXT
ID = EXEC("notepad")
SENDSTR(ID,LF)

//スライダーの値を取得
vMIN = GETSLIDER(ID,1,SLD_MIN)
vMAX = GETSLIDER(ID,1,SLD_MAX)

//視覚的に分かりやすいように待機時間をはさみながらスクロール制御
FOR A = vMIN TO vMAX STEP 2
SETSLIDER(ID,A,1)
SLEEP(0.1)
NEXT

FOR A = vMAX TO vMIN STEP -2
SETSLIDER(ID,A,1)
SLEEP(0.1)
NEXT

SETSLIDERやGETSLIDERは関数の説明に詳細がありますのでご参考ください。

タグ

2012年12月3日 | コメントは受け付けていません。 |

カテゴリー:Q&A

このページの先頭へ