FlexGirdの固定行をクリックし、ソートを実現したいと思います。
ソートに関してはなんら問題はありません。問題なのは、
固定行をコマンドボタンのように押したときに押し下がるような感じにしたいことです。
コマンドボタンを配置してできることはできるのですが、フォーカスがあたってしまい、文字が見にくくなります。FlexGridの設定やAPIなどでできるのでしょうか?
※コマンボタンの例
'--------------------
'Form1にコマンドボタンとフレキシブルグリッドを貼り付ける
'--------------------
Option Explicit
Private Sub Form_Load()
With MSFlexGrid1
.RowHeight(0) = 255
.Row = 0
.Col = 0
Command1.Caption = "ソート"
Command1.Height = .RowHeight(.Row)
Command1.Width = .ColWidth(.Col)
Command1.Top = .Top + .CellTop
Command1.Left = .Left + .CellLeft
End With
End Sub
私の場合は画像ファイルを通常と押し下げ状態の2種類の画像を
作って、Pictureを上に貼り付けてMouseDownとMouseUpで画像を
切り替えました。
みいさん、おっしゃるとおりにやってみました。ありがとうございます。
ツイート | ![]() |