StringGridのセル単位でEnableの制御を
行うことは可能でしょうか?
もし可能でしたら教えていただけないでしょうか?
よろしくお願いします。
OnSelectCellイベントで、セルを選択できなくしてしまう。
または、
OnSelectCellイベントで、Optionsプロパティの[goEditing]を追加・削除する。
3番目の列を編集不可にしたいとき。
procedure TForm1.StringGrid1SelectCell(Sender: TObject; Col, Row: Longint; var CanSelect: Boolean);
begin
if (Col = 3) then begin
StringGrid1.Options := StringGrid1.Options - [goEditing];
end
else begin
StringGrid1.Options := StringGrid1.Options + [goEditing];
end;
end;
他にあれば、もっとスマートな方法があれば教えてください。
ん? さん
回答ありがとうございました。
上記の方法だとフォーカスが遷移してしまい
要求する動きが出ないため、OnSelectCellイベントで、
セルを選択できなくするようにしました。
ツイート | ![]() |