表的查询问题.多多指教

Question

table1.first;
while not table1.eof do
begin
  combobox1.Items.add(table1.FieldByName('departname').AsString);
  table1.next;
end;

Answer 1

combobox1.Items.Clear;//先清除
table1.first;
while not table1.eof do
begin
  combobox1.Items.add(table1.FieldByName('departname').AsString);
  table1.next;
end;

Answer 2

你用dblookupcombox，一切尽再掌握！

Answer 3

同意jixinfa(DELHPI程序员) 。

Answer 4

combox1.clear;
with table1 do
  begin
    first;
    while not eof do
      begin
        combox1.items.add(fieldbyname('Department').asstring);
        next; 
      end;
   end;

Answer 5

用combox和dblookupcombox都比较可以，用combox则自己写代码，灵活性大一些，用dblookupcombox则设置属性及部分查询语句直观一点，根据需要看书选用就OK。

Answer 6

combobox1.Items.Clear
table1.first;
while not table1.eof do
begin
  combobox1.Items.add(table1.FieldByName('departname').AsString);
  table1.next;
end;