[リストへもどる]
一括表示
投稿時間：2002/10/02(Wed) 14:30
投稿者名：ひょろり
Ｅメール：
ＵＲＬ　：
タイトル：コンボボックスのスクロール
初めて投稿します。

VB6、WindowsXPで開発しています。

コンボボックスのリストが多いと自動的にスクロールが表示されますが、
このスクロールを表示させないで、全てのリストを表示させることは
可能でしょうか。

よろしくお願いします。

9999

投稿時間：2002/10/02(Wed) 14:41
投稿者名：とろ
Ｅメール：
ＵＲＬ　：
タイトル：Re: コンボボックスのスクロール
> コンボボックスのリストが多いと自動的にスクロールが表示されますが、
> このスクロールを表示させないで、全てのリストを表示させることは
> 可能でしょうか。

以前同じような質問がありましたね。
確か花ちゃんさんがサンプルみたいのを作成していたと思いますが．．．

左のフレームのリンクのどこかにあると思います。

投稿時間：2002/10/02(Wed) 14:43
投稿者名：ひょろり
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: コンボボックスのスクロール
> 左のフレームのリンクのどこかにあると思います。

とろさん、ありがとうございます！
もうちょっと調べればよかったです。

投稿時間：2002/10/02(Wed) 20:38
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: コンボボックスのスクロール
> > 左のフレームのリンクのどこかにあると思います。

他のコントロール関係の
コンボボックスのドロップダウンリスト項目数を変更する がそうです。

投稿時間：2002/10/03(Thu) 10:52
投稿者名：とーちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^4: コンボボックスのスクロール（Tab上のコンボで設定すると？）
初めて投稿させて頂きます。
VB6.0 SP5 + WIN2000で開発をしています。

コンボボックスのドロップダウンリスト項目数を変更する必要があったので
サンプルを使用させていただきました。

普通のフォーム上に張り付いているコンボボックスは正常に動くのですが、
タブコントロールの上に張り付いているコンボボックスに対してうまくいきません。。。
コンボボックスをクリックするとコンボボックス自体が見えなくなってしまいます。。

何か問題あるのでしょうか？よろしくお願いいたします。

投稿時間：2002/10/03(Thu) 19:42
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^5: コンボボックスのスクロール（Tab上のコンボで設定すると？）
> 初めて投稿させて頂きます。
> 普通のフォーム上に張り付いているコンボボックスは正常に動くのですが、
> タブコントロールの上に張り付いているコンボボックスに対してうまくいきません。。。
> コンボボックスをクリックするとコンボボックス自体が見えなくなってしまいます。。
>
> 何か問題あるのでしょうか？よろしくお願いいたします。

コンテナ上だとピクセル単位にならないので
表示位置をピクセル単位に変換してやればＯＫのようです。

解像度により違いますが、そこは取得して下さい。（たいていは　/15 でＯＫ）
サンプルの下記の部分を変更して下さい。

        '１２項目表示する場合の高さを求める
        CBHeight = (.Height \ 15) + CBHeight * Item + 2
        'コンボボックスの高さを変更
        Result = MoveWindow(.hwnd, .Left \ 15, .Top \ 15, .Width \ 15, CBHeight, 1&)

＃　今度は、動作確認しました。<m(__)m>

投稿時間：2002/10/04(Fri) 08:51
投稿者名：とーちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re^6: コンボボックスのスクロール（Tab上のコンボで設定すると？）
> コンテナ上だとピクセル単位にならないので
> 表示位置をピクセル単位に変換してやればＯＫのようです。
>
> 解像度により違いますが、そこは取得して下さい。（たいていは　/15 でＯＫ）
> サンプルの下記の部分を変更して下さい。
>
>         '１２項目表示する場合の高さを求める
>         CBHeight = (.Height \ 15) + CBHeight * Item + 2
>         'コンボボックスの高さを変更
>         Result = MoveWindow(.hwnd, .Left \ 15, .Top \ 15, .Width \ 15, CBHeight, 1&)
>
> ＃　今度は、動作確認しました。<m(__)m>

解決です！
上記のように変更したら問題なくいけました！！
ほんとにありがとうございました。

投稿時間：2002/10/02(Wed) 14:44
投稿者名：A221
Ｅメール：
ＵＲＬ　：
タイトル：Re: コンボボックスのスクロール
> 初めて投稿します。
>
> VB6、WindowsXPで開発しています。
> コンボボックスのリストが多いと自動的にスクロールが表示されますが、
> このスクロールを表示させないで、全てのリストを表示させることは
> 可能でしょうか。
>
> よろしくお願いします。

下記に「コンボボックスのドロップダウンリスト項目数を変更する」というのがありましたよ。

http://vbvbvb.com/jp/gtips/0001/gSendMessageCbGetitemheightDropdown.html