怎么将数据库中的数据取出来放到ComboBox中,中间要把相同的数据去掉,并且不能有空值出现,谢谢各位了!急~~~~~~~~~~~~~~~~~~~~~
解决方案 »
- 请高手指点一下,我用TClientSocket和TServerSocket编写的程序,当TClientSocket连续(大概有1000-2000条记录左右,一次连续就要发这么多)向T
- quickreport3.62是免费的吗?
- 如何安装ocx 控件
- 小弟刚学delphi,想学习一下三层结构,请问各位高手哪里有比较好的资料?
- 这段代码我不懂,能帮我详细解释吗?
- 请教!关于系统资源问题!
- 怎样把表中的某个字段的值全部用控件列出来?online wait
- 请教大家已经多长时间没有锻炼过了??
- 我是一个新手,想学习Delphi应该从哪里着手呀。请各位大侠指点。
- 如何进行没有设计窗口的设计?比如需要使用时间控件或仅仅是对文件属性进行修改之类的操作?
- TDataSetScrollProc=procedure(Dataset:TDataSet) of object;什么意思,使用有什么好处?
- 困扰几个月的问题,有关Indy的TidTcpServer接收命令后显示窗口问题
ComboBox.DisplayMember
begin
combobox1.clear;
with adoquery1 do
begin
close;
sql.clear;
sql.add('selecct distinct 字段 from tablename where 字段 is not null');
open;
end;
while adoquery1.eof do
begin
combobox1.items.add(query.fieldbyname('字段').value);
adoquery1.next;
end;
CDBMODULE.SearchData.First;
while not CDBMODULE.SearchData.Eof do
begin
editForm.ComboBox1.Items.Add(CDBMODULE.SearchData.fieldbyname('GJ').asstring);
editForm.ComboBox2.Items.Add(CDBMODULE.SearchData.fieldbyname('LB').asstring);
CDBMODULE.SearchData.Next;
end;
end;怎样在这段中去除重复和空值的记录,两个字的GJ和LB.急!!!!!!谢谢了!
上面这句才是满足你要求的要点所在。distinct :去除重复的记录
not null: 返回不为空的记录。
while not adoquery1.eof do