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 (記載なし)
Copyright © 2013 Power Future Co., Ltd.