[リストへもどる]
一括表示

投稿時間:2003/08/13(Wed) 00:29
投稿者名:まる
URL :
タイトル:
MSFlexGrid セル使用設定
初めて投稿します。
MSFlexGridを使用しているのですが、セル単位で選択できたりできなかったりという
制御は可能なのでしょうか?
回答、宜しくお願い致します。

投稿時間:2003/08/13(Wed) 01:40
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: MSFlexGrid セル使用設定
> MSFlexGridを使用しているのですが、セル単位で選択できたりできなかったりという
> 制御は可能なのでしょうか?

どこかの掲示板でよく似た質問があったように思うのですが、
セル単位で選択できたりできなかったりという制御は とはどういう事を意味しているのでしょうか
結果としてどういう事をしたいのでしょうか?
(MSFlexGridは元々表示専用のコントロールなのでセル単位で選択したところでExcelのように
Delキーを押してもセルの内容が消える訳でもないので)
まず、ここのMSFlexGrid関係を一通り目を通して下さい。特別な事以外はどこかに記入されて
いると思います。

投稿時間:2003/08/13(Wed) 08:52
投稿者名:まる
URL :
タイトル:
Re^2: MSFlexGrid セル使用設定
説明が不十分で申し訳ありません。
掲示板に目を通した上で質問させていただいています。
現在、SelectionMode = flexSelectionFreeにしてセル単位で選択可能にしています。
その場合に最初の4列だけは選択不可(Enable=Falseのような設定)にしてFix設定のようにフォーカスも当たらない状態にしたいのですが、そのような制御はクリックして選択された時点で処理を行うか行わないかの条件判定するしかないのでしょうか?

投稿時間:2003/08/13(Wed) 09:03
投稿者名:魔界の仮面弁士
Eメール:
URL :
タイトル:
Re^3: MSFlexGrid セル使用設定
> 現在、SelectionMode = flexSelectionFreeにしてセル単位で選択可能にしています。
> その場合に最初の4列だけは選択不可(Enable=Falseのような設定)にして
> Fix設定のようにフォーカスも当たらない状態にしたいのですが、

案1: 選択不能な4列部分だけ、別の(フォーカス無しの)グリッドにしておく。
     そしてScrollイベントにて、両者のTopRowプロパティを同期させる。

案2: フォーカス無しモードを採用しておき、EnterCellイベント等で、
     CellBackColorを変更する事で、フォーカスのように見せかける。   

投稿時間:2003/08/13(Wed) 09:43
投稿者名:まる
URL :
タイトル:
Re^4: MSFlexGrid セル使用設定
フォーカス無しモードっていうのがあったんですね!FocusRectを使用するんですよね?
それでやってみます!解決できそうです。
花ちゃんさん、魔界の仮面弁士さん、ありがとうございます!

投稿時間:2003/08/13(Wed) 10:07
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^4: MSFlexGrid セル使用設定
下記でもいいのでは
Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
    With MSFlexGrid1
        If .MouseCol < 4 And Button = vbLeftButton Then
            .Col = 4
        End If
    End With
End Sub
Private Sub MSFlexGrid1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
    With MSFlexGrid1
        If .MouseCol < 4 Or .ColSel < 4 Then
            .FocusRect = flexFocusNone
            .HighLight = flexHighlightNever
        Else
            .FocusRect = flexFocusLight
            .HighLight = flexHighlightAlways
        End If
    End With
End Sub

他の掲示板に投稿された方と同じ方ならあちらにも解決報告をしておいて下さい。
マルチポストはマナー違反です。
インターネット上のマナーについては調べておいて下さい。

投稿時間:2003/08/13(Wed) 15:15
投稿者名:まる
URL :
タイトル:
Re^5: MSFlexGrid セル使用設定
すみまません。初めて掲示板に投稿し、ルールも確認しないで使用していました。
ご迷惑をおかけしました。ご指摘、有難うございます。