投稿日	： 2003/07/02(Wed) 19:02
投稿者	： Blues
Ｅメール	：
ＵＲＬ	：
タイトル	： MSHFlexGridの固定行座標の取得

いつも勉強させていただいてます。Bluesと申します。
次のとおり、フォーム上にMSHFlexGridを表示させ、
MSHFlexGridのクリックイベントで固定行がクリック
されたら？という条件判断をさせたいのですが、
必ず固定行ではない座標値(1以上)が帰ってきます。
なにがいけないのでしょうか？
固定行部分をクリックした場合にソート処理を是非
行いたいのです。
よろしくお願いいたします。

Private Sub Form_Load()
    dim cm as Integer
    dim rw as Integer

    With MSHFlexGrid1
        .Visible = False
        .Cols = 11
        .Rows = 11
        '固定行・列(タイトル部分)表示 かいし
        .Row = 0    
        For cm = 1 To .Cols - 1
            .Col = cm
            .Text = "Title" + CStr(cm)
        Next cm
        .Col = 0
        For rw = 1 To .Rows - 1
            .Row = rw
            .Text = "Line" + CStr(rw)
        Next rw
        '固定行・列　表示　しゅうりょう
        
        'データ表示
        For rw = 1 To .Rows - 1
            For cm = 1 To .Cols - 1
                .TextMatrix(rw, cm) = rw * cm
            Next cm
        Next rw
        .Visible = True
    End With
End Sub

Private Sub MSHFlexGrid1_Click()
    If MSHFlexGrid1.Row > 0 Then '←必ずここでMSHFlexGrid1.Rowが
        Exit Sub                 '1以上の値を返してしまうのです。(悲)
    End If
    
    MSHFlexGrid1.Sort = 1    '昇順ソート
End Sub

★ - MSHFlexGridの固定行座標の取得 - Blues 07/02-19:02No.4575
• Re: MSHFlexGridの固定行座標の取得 - 花ちゃん 07/02-19:18 No.4576
  • Re^2: MSHFlexGridの固定行座標の取得 - Blues 07/02-19:25 No.4578
    • Re^3: MSHFlexGridの固定行座標の取得 - 花ちゃん 07/02-19:38 No.4579
      • Re^4: MSHFlexGridの固定行座標の取得 - Blues 07/02-20:01 No.4580