2,497
社区成员
发帖
与我相关
我的任务
分享如何向COMBOBOX.ITEMS添加数据表查询值
DELPHI 如何把ADOQUERY查询出来的数据库表值，添加到COMBOBOX.ITEMS中。
sqlstr:='select org_name from organization' ;
ADOquecom.Close;
ADOquecom.SQL.Clear;
ADOquecom.SQL.Add(sqlstr);
ADOquecom.Open;
COMBOBOX2.Items.Add()
sqlstr:='select org_name from organization' ;
ADOquecom.Close;
ADOquecom.SQL.Clear;
ADOquecom.SQL.Add(sqlstr);
ADOquecom.Open;
COMBOBOX2.Items.Add()
...全文
请发表友善的回复…
发表回复
鏗木鏘林 2016-01-10
- 打赏
- 举报
我网上看了是这样写的可以正确执行
if ADOQuery1.RecordCount>0 then
begin
for i:=0 to ADOQuery1.RecordCount-1 do
begin
ComboBox1.Items.Add(ADOQuery1.FieldByName('name').AsString);
ADOQuery1.Next;
end;
doloopcn 2016-01-09
- 打赏
- 举报
在ADOQuery的afteropen事件中加入
COMBOBOX2.Items.Clear;
while not DataSet.Eof do
begin
COMBOBOX2.Items.Add(DataSet.FieldByName('字段名').AsString);
DataSet.Next;
end;
