Question

delphi如何给dbgrid的标题行加上下拉列表

Answer 1

我来告诉你吧~~

这要安装DevExpress控件的~~~使用TcxGrid控件就可以实现你要的效果了~~~

Answer 2

比较容易实现的方案是把DBGrid和ComboBox组合起来使用，就是用ComboBox盖住DBGrid的标题栏，然后写代码实现这两个控件信息的交换

追问

但怎样才能准确定位呢？如何获取标题行各列的rect啊，

追答

用代码实现Combobox的Top和Left属性就行
我很想知道做这个下拉列表是干什么用的。。。

追问

筛选数据，类似于excel的自动筛选功能，越来越糊涂了，能给个例子吗，我是个新手，分不多，若解决问题，可以都给你。

追答

不知道你是用什么控件连接数据库的，如果是ADOQuery的话，就在Combobox的OnChange事件里面写代码：
With ADOQuery1 do
begin
Close;
Sql.Add('Select * from 表名 Where 列名= '''+ Combobox.Text+'''');
Open;
end;
把上面的汉字替换成你数据库里面的表名和列名，不就实现筛选了！

追问

是的，就是ADOQuery，筛选没问题，但如何用ComboBox盖住DBGrid的标题栏，可能是我没说明白，我的意思是先用ComboBox（多个）盖住DBGrid的标题栏各列，但ComboBox不显示，当用鼠标点击DBGrid的标题栏时才显示下拉列表，然后才是筛选的动作。

追答

换个思路嘛，在DBGrid的事件里面有个OnTitleClick，在这个事件里面写代码实现弹出下拉列表，按你的思路，不用ComboBox的话，直接弹出ListBox也是可以的