100来谢谢您的帮助:)

Question

在edit3.Text :=inttostr(gbjbxxquery_1.recordcount);之前先
gbjbxxquery_1.Last;
gbjbxxquery_1.First;

Answer 1

还有一个小问题，加在一起给分；
如何让combobox处于不可编辑状态？
但是不能是combobox.enabled:=false//那种颜色不好看

Answer 2

datetimepicker7.DateTime指定到秒，所以你可能找不到数据！
重新设置查询条件吧！

Answer 3

TO gzmhero(hihihi) 
为什么要那么做？

Answer 4

Combobox.Style := csDropDownList;

Answer 5

1:
你可以先first or last;
2:不可编辑，什么意思？？

Answer 6

不可编辑，什么意思？？ 
是不可先还是不可编辑？
不可编辑：combobox.style:=csdropdownlist;

Answer 7

1.你的查询条件是？如果只是限制日期，（你的数据库是Ｏｒａｃｌｅ），你可以这么写：
　　sql.Add('where to_char(字段,'yyyy-mm-dd')=:sDate');
   paramByName('sDate'):=ForamtDateTime('yyyy-mm-dd',DateTimePicker7.Date);
这样肯定没有问题．
都转换成Ｓｔｒｉｎｇ类型进行比较了．
2.Combobox.Style := csDropDownList;

Answer 8

各位大哥；
我的combobox不想让其被用户选，不是不可让用户修改啊；
是不让它们选；
也就是那个属性和enabled一样？但是，颜色不能像enabled那个样子；

Answer 9

datetimepicker7.Date
Combobox.Style := csDropDownList;

Answer 10

TO bumman
你那样就可以不让用户选择？

Answer 11

不好意思，给分了；如下； with gbjbxxquery_1 do begin close; sql.Clear ; //sql.add('select * from m_jbqk where str = #'+DateToStr(datetimepicker7.datetime)+'#'); sql.add('select * from m_jbqk where '+ str +'=:Date1'); ParamByName('Date1').value:=datetimepicker7.DateTime ; open; end; edit3.Text :=inttostr(gbjbxxquery_1.recordcount); //明明还有30多条记录呀；如何办？为什么会是这样的？
在这儿，先向gzmhero(hihihi）和ihihonline(小小)致谢；一定会给你给分的；
另外，也谢谢大家有时间来看一看；