Código Delphi
[-]var i:integer;
begin
ComboBox1.Clear;
ADOQuery1.First;
for i:=0 to ADOQuery1.RecordCount-1 do
begin
ComboBox1.Items.Add(ADOQuery1.Fields[0].AsString);
ADOQuery1.Next;
end;
end;
lo de actualizar dinamicamente el combobox lo puedes implementar con un simple Timer.
Saludos.