PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
10871 00/03/30 14:02:38 RE(6):水平スクロールもできました By yamami
10868 00/03/30 13:29:26 RE(5):垂直スクロールはできました!(誰かSendのメッセージ番号の調べかたを教えてください・・・) By yamami
10858 00/03/29 12:24:28 RE(4):PB7.0: 画面のスクロールの位置を0に戻したい By こてちゅ
10857 00/03/29 11:29:21 RE(3):PB7.0: 画面のスクロールの位置を0に戻したい By yamami
10845 00/03/28 14:21:07 RE(2):PB7.0: 画面のスクロールの位置を0に戻したい By こてちゅ
10840 00/03/28 12:49:03 RE(1):PB7.0: 画面のスクロールの位置を0に戻したい By muramura
10838 00/03/28 11:11:10 PB7.0: 画面のスクロールの位置を0に戻したい By yamami

カテゴリ:スクリプトの記述
日付:2000年03月30日 13:29 発信者:yamami
題名:RE(5):垂直スクロールはできました!(誰かSendのメッセージ番号の調べかたを教えてください・・・)

こてちゅさん、こんにちは。

>対処を変えることで解決したようですが、今後の参考に。
>Tech Wiredの# . P9802348 にPageUpキーなどでスクロールさせる方法が載っていました。
>これを使うと、うまくスクロールできるかもしれません。

ありがとうございます!おかげで Sendを使って垂直スクロールのほうは
思った通りにできました。ものすごく嬉しいです。
できた時には叫びそうになりました・・・

こんなふうにしました。
***************************************************

// 幅が狭くなったら水平スクロールバーを表示
IF THIS.width < ii_win_width THEN
    THIS.Hscrollbar = TRUE
ELSE
    ・・・ここは調べ中
    THIS.Hscrollbar = FALSE
END IF

// 高さが狭くなったら垂直スクロールバーを表示
IF THIS.height < ii_win_height THEN
    THIS.vscrollbar = TRUE
ELSE
    Send(Handle(this),277,5,0)
    THIS.vscrollbar = FALSE
END IF

***************************************************

>このときのSend関数の引数ですが、\"277\"の次に来る引数が\"1\"の場合はスクロールダウンで、
>\"0\"の場合がアップになります。

左へスクロールさせるため、2番目の引数を 1?100まで総当たりしてみたんですが
その時に \"5\" を使うと一番上まで一気に PageUp するのを発見しました。
グルグルまわさなくてすむので、なかなか便利でした。

ちなみに未だ左へスクロールできずにいるんですが、2番目の引数をいくら変えても
ダメなので、今度は1番目のメッセージコードを200番台総当たりしてみます。

でもどなたか、Sendのメッセージ番号の調べかたをご存知のかたがいらしたら教えて
いただけないでしょうか。winuser.h を見てもどうにもわからないのです。
\"SDK\"をいくらネットで検索しても、それらしいものがでてきません。本屋にも
ないし、Sendを使ってる人はどうやって調べていますか?



付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows95
DBMS (記載なし)
Browser InternetExplorer5.X

Server SoftWare

OS (記載なし)
DBMS Oracle 7.3
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.