问题是这样的，我放了一个Ttable,一个Tquery，两个Tdatabase，一个Tdbgrid 一个Tbutton，一个Tedit,刚开始我把dbgird1的datasource 设为query1,然后button的事件加入如下代码: q_batch.Close; table1.Filtered := false; table1.Filter := 'y1=' edit1.Text; table1.Filtered := true; table1.Active := true; dbgrid1.DataSource := fm_batchnew.DataSource1; 当程序执行到table1.Active := true时，便报错，错误为：Capability Noy Supported.是什么原因呢？难道是table1的filter属性设置有问题？不是的话是什么原因呢？请大家帮我看看！

你y1是甚麼欄位丫? 文字的話應要設成 table1.Filter := 'y1=' QuotedStr(edit1.Text); 還有，你確定若不設 Filter 便能正確開啟嗎?

谢谢Justmade！Y1为Char(12)的字段，如Y1='200302040001'; 我想问一下QuotedStr（）函数的具体用法是怎么用的，好象我把table1.Filter := 'y1=' edit1.Text;改为table1.Filter := 'y1=' QuotedStr(edit1.Text);时，依然还是存在同样的问题。 還有，你確定若不設 Filter 便能正確開啟嗎? 当我不设定Filter时，没有任何问题。是什么原因呢？

FILTER 應該是在query run 起來之後給值的,但是沒有run應該也不會錯 還有你要用的條件必須在 selece 的裡面有,假如有使用alias name 就必須與alias NAME 的名字相同 要不然會有錯誤 試試以下的程式看看 table1.Filtered := false; table1.Active := true; if not table1.Filtered then := table1.Filtered := true; table1.Filter := 'y1=' edit1.Text; ---------------------- 一切有為法 如夢幻泡影 如露亦如電 應做如是觀 ----------------------

補述一下 table1.Filter := 'y1=' edit1.Text; 若你的y1是字串的話可以改成 table1.Filter := 'y1=''' edit1.Text ''''; 印為是字串要給他知道 是雙引號包起來的 ---------------------- 一切有為法 如夢幻泡影 如露亦如電 應做如是觀 ----------------------

QuotedStr 就是幫你在 Edit1.Text 的前後加單引號，因為 BDE 的 Filter 不接受雙引號的。不過我之前 post 的少了加號

谢谢Justmade！我把y1改为Y1之后就行了，我觉得很奇怪，照里说y1和Y1应该没有区别的，至少在sql2000的查询分析器里是这样的，但通过delphi时就出问题了。

谢谢Justmade！我把y1改为Y1之后就行了，我觉得很奇怪，照里说y1和Y1应该没有区别的，至少在sql2000的查询分析器里是这样的，但通过delphi时就出问题了。