你用combobox也可以啊 ,U_HTQCBF 是string 吗?
在form的onshow中写
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select*from U_HTQCBF where F_BH="01"');
adoquery1.open;
adoquery1.first;
while not adoquery1.eof do
begin
combobox1.items.add(adoquery1.fields[0].value);
adoquery1.next;
end;
在它的onChange事件里写
if DBLookupComboBox.ItemIndex=1 then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select*from U_HTQCBF where F_BH="01"');
end
else
if DBLookupComboBox.ItemIndex=..then
begin
end