[alex-chz]

Сообщение от Professor Farnsworth

Код:

With DBComboBox1.Items do
begin
    Table1.first;
    While not Table1.EOF do
    begin
          Clear;
          Add(Table1.Field[1].asString);
          Table1.next;
    end;
end;

Большое спасибо и на этом, теперь все отлично работает
Только зачем была строка Clear?