如何将数据表adotable的一个字段的内容放到combobox的items中,供选择用?
急用!请大侠帮忙
急用!请大侠帮忙
解决方案 »
- 在使用hook时,我实在搞不懂 CallNextHookEx 起什么作用。
- 在线等:如何在窗体里显示网页信息
- 有增强型的RichEdit控件吗给一个!
- DevExpress 按钮
- 我是用新的单元写不面过程,请问TFileStream是否要在接口引用VCL库的某个单元??
- 数据一直累加,就是不从新开始,急啊
- 有个COM+/ActiveX的问题请教各位高手!
- 创智怎样?
- Delphi中的自动输入怎么设置?
- 我想知道,我们平时用的计算机..............
- 在线等待!!!!请教查询的小问题。
- 请问如何做QQ自动回复?要智能的,比如不同好友,不同回复,不同分组的、不同性别的等等,都能识别????
Combobox1.Items.Add(Table1.FieldByName('字段名').AsString);
begin
combobox.items(i):=table.fieldbyname("字段").asstring
end
for i=0 to adotable.recordcount do
begin
combobox.items.add( table.fieldbyname("字段").asstring);
adotable.next;
end
with adoquery1 do
try
close;
sql.clear;
sql.add('select Field1 from yourtable where......');
prepared;
open;
if not isempty then
begin
first;
while not eof do
begin
combobox.items.add(Fields[0].asstring);
next;
end;
end;
except
messagebox(self.handle,'error','information',mb_ok);
exit;
end;