如何将对表的字段查询结果存如COMBOBOX中找用友财务软件官网

仓库管理软件版1楼: 我有一个产品表,我想把产品中的品牌字段通过ADOQUERY控件查询出所有的品牌,然后存放在COMBOBOX控件中,如何做到。

2楼: DBLookupComboBox来做，
adoquery１.Close;
adoquery１.SQL.Clear;
adoquery１.SQL.Add(＇＇select * from ...where 品牌名称=:a＇＇);
adoquery１.Parameters.parambyname(＇＇a＇＇).Value:=DBLookupComboBox1.Text;
adoquery１.open;

然后做一个distinct消除如下：
adoQuery1.Close;
adoQuery1.SQL.Clear;
adoQuery1.SQL.Add(＇＇select DISTINCT 产品名称 from cp＇＇);
adoQuery1.Open;
就可以了．．．对了，你要自己测试，两个程序端用的是两个不同的ＡＤＯquery．．．．如进销存管理系统

3楼: while not ADOQuery1.Eof do
ComboBox1.Items.Add(ADOQuery1.FieldByName(＇＇品牌＇＇).AsString);

4楼: var
s:string;
while not ADOQuery1.Eof do
s:=ADOQuery1[＇＇品牌＇＇];
ComboBox1.Items.Add(s);

5楼: with DataModule1.ADOBaseInfo(你想操作的表名) do
begin
sql.Clear;

sql.Text := ＇＇select Number from BaseInfo＇＇;
prepared;
open;
first;

comsex(替换为你的combobox).Items.Clear;
i := 0;(i在前面定义)
while i begin
comsex.Items.Add(FieldByName(＇＇number＇＇).AsString);
inc(i);
next;
end;
end;

6楼: if ADOQuery1.active then ADOQuery1.close ;
ADOQuery1.sql.clear ;
ADOQuery1.sql.text:=＇＇select distinct 品牌 from 产品 order by 品牌＇＇ ;
ADOQuery1.open ;
if ADOQuery1.recordcount>0 then
begin
ComboBox1.clear ;
ADOQuery1.first ;
while not ADOQuery1.Eof do
begin
ComboBox1.Items.Add(Trim(ADOQuery1.FieldByName(＇＇品牌＇＇).AsString));
ADOQuery1.next ;
end ;
end ;

仓库管理软件版7楼: 产品表中有品牌,产品,型号.如果我想在第一个combobox中加入了产品表中的所有唯一的品牌后,当改变一项后如何让这样品牌的所有产品加入到第二个COMBOBOX中,完了就送分.

8楼: 这个太简单了吧

9楼: 在ComboBox1.onChange中处理
select...
ComboBox2.Items.Clear;
ComboBox2.Items.Add(...);

10楼: // 选择要查找的国家
void __fastcall TMain_Form::CountryCondition_ComboBoxDropDown(
TObject *Sender)
{
CountryCondition_ComboBox->Clear();
AnsiString Sql;
// int i;

Main_DataModule->ADOQuery1->Close();
Main_DataModule->ADOQuery1->SQL->Clear();
Sql = ＂select * from Country_Index＂;
Main_DataModule->ADOQuery1->SQL->Add(Sql);
Main_DataModule->ADOQuery1->Open();

while(!Main_DataModule->ADOQuery1->Eof)
{
CountryCondition_ComboBox->Items->Add(Main_DataModule->ADOQuery1->FieldByName(＂COUNTRY_NAME＂)->AsString);
Main_DataModule->ADOQuery1->Next();
}
BasinCondition_ComboBox->Clear();
FieldCondition_ComboBox->Clear();
}

11楼: 在cb1的onchange事件里再去查询符合所选择条件的记录，然后用同样方法把结果添加到cb2里。

12楼: if frmdm.ADOQuery1.active then frmdm.ADOQuery1.close ;
frmdm.ADOQuery1.sql.clear ;

frmdm.ADOQuery1.sql.text:=＇＇select distinct 品牌 from 库存 order by 品牌＇＇ ;
frmdm.ADOQuery1.open ;
if frmdm.ADOQuery1.recordcount>0 then
begin
suiComboBox1.clear ;
frmdm.ADOQuery1.first ;
while not frmdm.ADOQuery1.Eof do
begin
suiComboBox1.Items.Add(Trim(frmdm.ADOQuery1.FieldByName(＇＇品牌＇＇).AsString));
frmdm.ADOQuery1.next ;
end ;

end ;
这个就可以如用友财务软件官网

13楼: if frmdm.ADOQuery1.active then frmdm.ADOQuery1.close ;
frmdm.ADOQuery1.sql.clear ;
frmdm.ADOQuery1.sql.text:=＇＇select distinct 品牌 from 库存 order by 品牌＇＇ ;
frmdm.ADOQuery1.open ;
if frmdm.ADOQuery1.recordcount>0 then
begin
suiComboBox1.clear ;
frmdm.ADOQuery1.first ;
while not frmdm.ADOQuery1.Eof do
begin
suiComboBox1.Items.Add(Trim(frmdm.ADOQuery1.FieldByName(＇＇品牌＇＇).AsString));
frmdm.ADOQuery1.next ;
end ;

end ;

仓库管理软件版14楼: 多人接受答案了。