由于在DBGRID中一旦發生AfterScroll事件，adoquery會自動取消edit狀態
于是我在afterScroll事件中加入

adoquery1.edit;

這樣似乎解決了...但某些時候又會導緻dbgrid自身閃爍,請教各位大大解決方法，謝謝！

會閃爍是因為你一直在引發afterScroll事件, 請檢查你的程式

------
聰明的人，喜歡猜心；雖然每次都猜對了，卻失去了自己的心
傻氣的人，喜歡給心；雖然每次都被笑了，卻得到了別人的心

謝謝版主大大的囬答，其實這個我也知道，可問題是，我想不到更好的解決辦法避免出先 dataset not in edit or insert mode 這種錯誤

希望大大不吝賜教
===================引 用 Jasonwong 文 章===================
會閃爍是因為你一直在引發afterScroll事件, 請檢查你的程式

是否考虑一下,在之前加入 if ADOQuery1.State <> dsEdit then进行检查,以确定,如果是在Edit模式,不需要触发相关事件.

請問一下, 你為什麼要在 AfterScroll 中下 Edit 指令, 難道 DataSource 的 AutoEdit 沒作用嗎 ?

Edit 指令能不能下在 DBGrid.OnEnter 中呢

------
聰明的人，喜歡猜心；雖然每次都猜對了，卻失去了自己的心
傻氣的人，喜歡給心；雖然每次都被笑了，卻得到了別人的心

謝謝你的囬復，但這樣做似乎沒有效用


===================引 用 qqufo 文 章===================
是否考虑一下,在之前加入?if ADOQuery1.State <> dsEdit then进行检查,以确定,如果是在Edit模式,不需要触发相关事件.

謝謝版主大大的囬復，是的 AUTOEDIT沒起作用，我每次按下箭頭到下一筆記錄再修改就會出現dataset not in edit or insert錯誤。因此，edit指令下在DBGrid.OnEnter 中也不能解決問題

補充說明一下，adoquery使用ltBatchOptimistic模式,autoedit已設為true，實際上使用的不是dbgrid而是dbgrideh，謝謝！
===================引 用 Jasonwong 文 章===================
請問一下, 你為什麼要在 AfterScroll 中下 Edit 指令, 難道 DataSource 的 AutoEdit 沒作用嗎 ?

Edit 指令能不能下在 DBGrid.OnEnter 中呢

看來要請你公佈你的程式碼了, 因為我實地拉了一個 ADOQuery 跟一個 DBGrid 做了一個簡單的測試, 並沒有發你所講的錯誤

------
聰明的人，喜歡猜心；雖然每次都猜對了，卻失去了自己的心
傻氣的人，喜歡給心；雖然每次都被笑了，卻得到了別人的心

程式碼很簡單修改按鈕：adoquery1.edit,然后就是相應的dbgrideh1.Columns[i].ReadOnly := false;

object DBGridEh1: TDBGridEh
Left = 0
Top = 58
Width = 800
Height = 327
Align = alClient
AllowedOperations = [alopInsertEh, alopUpdateEh, alopAppendEh]
DataSource = datasource1
Flat = False
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'Tahoma'
FooterFont.Style = []
FrozenCols = 1
Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab]
RowHeight = 26
RowSizingAllowed = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
UseMultiTitle = True
Columns = <
item
EditButtons = <>
FieldName = 'clientno'
Footers = <>
ReadOnly = True
Width = 61
end
item
EditButtons = <>
FieldName = 'clientname'
Footers = <>
ReadOnly = True
Width = 131
end

。。。。。。
end



object adoquery1: TADOQuery
LockType = ltBatchOptimistic
AfterScroll = adoquery1AfterScroll
Parameters = <>
SQL.Strings = (
'')
Left = 12
Top = 177
object adoquery1clientno: TStringField
DisplayLabel = #3545#5677
FieldName = 'clientno'
FixedChar = True
Size = 15
end
.........


object datasouce1: TDataSource
DataSet = adoquery1
Left = 41
Top = 178
end

謝謝！
===================引 用 Jasonwong 文 章===================
看來要請你公佈你的程式碼了, 因為我實地拉了一個 ADOQuery 跟一個 DBGrid 做了一個簡單的測試, 並沒有發你所講的錯誤

我想你的問題應該出在你有某些欄位的 ReadOnly = True

試著把 ReadOnly 都改成 False 試試吧

===================引 用 bayman 文 章===================
謝謝版主大大的囬復，是的 AUTOEDIT沒起作用，我每次按下箭頭到下一筆記錄再修改就會出現dataset not in edit or insert錯誤。因此，edit指令下在DBGrid.OnEnter 中也不能解決問題

補充說明一下，adoquery使用ltBatchOptimistic模式,autoedit已設為true，實際上使用的不是dbgrid而是dbgrideh，謝謝！

------
聰明的人，喜歡猜心；雖然每次都猜對了，卻失去了自己的心
傻氣的人，喜歡給心；雖然每次都被笑了，卻得到了別人的心

謝謝大大的解答，這樣的確沒問題了，謝謝！

希望大大再解答我一個小問題，在DBGRID輸入數據保存后，髮現最后一個修改過的記錄總是不能保存,即使保存時首先adoquery1.post也不行，謝謝！
===================引 用 Jasonwong 文 章===================
我想你的問題應該出在你有某些欄位的 ReadOnly = True

試著把 ReadOnly 都改成 False 試試吧

===================引 用 bayman 文 章===================
謝謝版主大大的囬復，是的 AUTOEDIT沒起作用，我每次按下箭頭到下一筆記錄再修改就會出現dataset not in edit or insert錯誤。因此，edit指令下在DBGrid.OnEnter 中也不能解決問題

補充說明一下，adoquery使用ltBatchOptimistic模式,autoedit已設為true，實際上使用的不是dbgrid而是dbgrideh，謝謝！

這個要看你程式是怎麼寫的, 這個我沒辦法憑想像去回答你, 最好是有程式碼

===================引 用 bayman 文 章===================
謝謝大大的解答，這樣的確沒問題了，謝謝！

希望大大再解答我一個小問題，在DBGRID輸入數據保存后，髮現最后一個修改過的記錄總是不能保存,即使保存時首先adoquery1.post也不行，謝謝！

------
聰明的人，喜歡猜心；雖然每次都猜對了，卻失去了自己的心
傻氣的人，喜歡給心；雖然每次都被笑了，卻得到了別人的心

===================引 用 bayman 文 章===================
謝謝大大的解答，這樣的確沒問題了，謝謝！

希望大大再解答我一個小問題，在DBGRID輸入數據保存后，髮現最后一個修改過的記錄總是不能保存,即使保存時首先adoquery1.post也不行，謝謝！
請確定最後一個是否有觸發到!!

------
======================
昏睡~
不昏睡~
不由昏睡~