Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





Заполнение TDBComboBox


procedure TForm1.FormCreate(Sender: TObject);
begin
  with table2 do
  begin
    open;
    while not EOF do
    begin
      DBlistbox1.items.add(FieldByName('name').AsString);
      next;
    end;
  end;
end;

           




Программы  |  Загрузка  |  Партнерство  |  О компании  |  Контакты

Copyright © LSD Software 2006 - 2011