各位前輩好!

小弟這有一個StringGrid預設Options.goEditing = True
想設定成col in [1,3,5] = 可編輯, else 唯讀,

目前寫在StringGrid.onMouseDown中MouseToCell去判斷是哪個Col再賦予可編輯或唯讀,
但是...... 小弟發現在可編輯的Col編輯完當Mouse點到隔壁的唯讀Col時... 第一次點它還是可編輯
必須在那"唯讀的Col"上下移動, 才會變成唯讀的狀態... 怎麼會這樣呢? 試好久囉~ 不知道有沒有好方法??

小弟曾想過如果把架構改成TClientDataSet DBGrid來做的話是不是會比較好控制...

謝謝各位先進!

------
請多多指教，謝謝！

如下:
[code delphi]
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
if ACol in [1,3,5] then stringgrid1.Options:= stringgrid1.Options [goEditing]
else stringgrid1.Options:= stringgrid1.Options-[goEditing];
end;

[/code]

使用dbgrid 反而控制上更麻煩, 不過資料連結上是容易的多!
但如果你的資料很大, 不建議用strginggrid, 因為本身stringgrid 就是使用類似陣列buffer來處理物件, 很吃資源的!

編輯記錄

感謝PD大犧牲睡眠時間替小弟解答!

小弟真是豬頭啊~ 沒注意到SelectCell有ACol & ARow可以用，之前直接找StringGrid1.Col or Row發現有時候抓到的數值是錯的~
經PD大指點後已經很OK了! 感謝再感謝~

請收下小弟的分數，謝謝!

------
請多多指教，謝謝！