Загрузка данных из таблицы в ComboBox, ListBox…
begin
with Table1 do
begin
open;
while not EOF do
begin
ComboBox1.items.add(FieldByName('FIO').AsString);
Next;
end;
end;
end; |