一般都用Combobox做下拉框。灵活点。 写一个给你 with ADOqry do begin close; sql.clear; sql.add(sql语句关联下拉内容的表); open; combobox1.items.clear; while not eof do begin combobox1.items.add(ADOqry.fieldbyname('字段名').asstring); next; end; end;
我觉得这是最灵活的一种方式了with ADOqry do begin close; sql.clear; sql.add(sql语句关联下拉内容的表); open; combobox1.items.clear; while not eof do begin combobox1.items.add(ADOqry.fieldbyname('字段名').asstring); next; end; end;
写一个给你
with ADOqry do
begin
close;
sql.clear;
sql.add(sql语句关联下拉内容的表);
open;
combobox1.items.clear;
while not eof do
begin
combobox1.items.add(ADOqry.fieldbyname('字段名').asstring);
next;
end;
end;
begin
close;
sql.clear;
sql.add(sql语句关联下拉内容的表);
open;
combobox1.items.clear;
while not eof do
begin
combobox1.items.add(ADOqry.fieldbyname('字段名').asstring);
next;
end;
end;