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

スクロールバーを制御したいのですが、方法がわかりません。最後までスクロールしたり、最初にスクロールする方法を教えてください
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は関数の説明に詳細がありますのでご参考ください。

関連情報:

  1. GETSLIDER
  2. SETSLIDER
  3. THREAD
  4. 任意の文字列をメモ帳に書き出したい
  5. COMオブジェクトからInternet Explorerを操作したい


続きは、ログインもしくは、登録してください



このページの先頭へ