階層フレキシブルコントロールで質問です。

質問

今、ＶＢ６で、階層フレキシブルグリッドコントロール（MSHFLEXGRID）を
使用して、ＡＤＯデータコントロール（ＡＤＯＤＣ）で接続した、
ＯＤＢＣデータベースのデータを表示させています。

その表示されたセルをクリックすることで、横１行データを選択して、
変更用フォームにデータをコピーさせているのですが、
垂直方向のスクロールをしていない状態と
スクロールさせた状態で、クリックした位置（プロパティMouseRowを使用）が
違うのです。
具体的には、データ件数４０件で、最大表示３０件の状態で、以下のようでした。

『スクロール前』　　クリック位置　　MouseRowの値
　　　　　　　　　　　項目欄　　　　　　０
　　　　　　　　　　　１行目　　　　　　０
　　　　　　　　　　　２行目　　　　　　１
　　　　　　　　　　２０行目　　　　　１９
　　　　　　　　　　３５行目　　　　クリックせず
　　　　　　　　　　４０行目　　　　クリックせず
　　　　　　　　　　　　欄外　　　　クリックせず

『スクロール後』
　　　　　　　　　　　項目欄　　　　　　０
　　　　　　　　　　　１行目　　　　　　１
　　　　　　　　　　　２行目　　　　　　２
　　　　　　　　　　２０行目　　　　　２０
　　　　　　　　　　３５行目　　　　　３５
　　　　　　　　　　４０行目　　　　　４０
　　　　　　　　　　　　欄外　　　　　４０

また、表示件数１５件だと、まったく『スクロール前』の状態でしたが、
別の日付のデータでスクロールをさせると、『スクロール後』の状態に
なりました。

どうも、ＡＤＯＤＣを使用すると、こうなるらしいのですが、
対策を教えていただけませんか？

回答No.2

TAGOSAKU7 · ベストアンサー

そうですかー。ならばMSHFlexGridを使用せざるをえないですね。。。

要はクリックした正確な位置を取得したいのですよね？

回避方法ですが
１．Private宣言により変数２つを宣言
２．マウスダウンのイベントでMouseRow/MouseColを取得し、Private宣言した変数にセット
３．クリック時イベントでMouseRow/MouseColを取得しないで、Private宣言した変数を使用する

はずしてたら、すいません。

お礼

この通りやりましたが、うまくいきませんでした。
ただ、ＳＱＬ文がまずかったらしく、構成を変えたら
うまくいきました。結果オーライ！ありがとございます。

回答No.1

TAGOSAKU7

回答になってはないとは思うけど、、、

僕の場合はあまりFlexGridは使用してません。必要のない機能が多いからです。データを連結して表示するようなことをしてたり、Grid単位での色づけをしてるのであれば話は別ですが・・・

そんなことがないのであれば、DataGridを使用してみてはいかがでしょうか？
ADOデータコントロールを使用してるみたいだし、DataGridとの相性も悪くないですよ。

どうしてもFlexGridじゃなきゃだめですか？

補足

書き忘れてましたが、おっしゃる通り、データ内容で、３色に塗り分けていますので、FlexGridでないと・・・