delphi access数据库筛选查询

Query.sql.text:=

'select

*

from

表

where

字段='''

+combobox.text

+''''

query.open

dbgrid中的数据来源于adoquery1.所以在adoquery1中筛选好，dbgrid1中会显示筛选后的内容。

可以用filter，

不过用sql语句实在些。

with adoquery1 do begin

close

sql.clear

sql.add('select * from 表 where c=‘’‘+trim(combobox1.text)+'''')

execsql

open

end

---