Hola
Empecemos algo generico:
Coloquemos los datos de los campos:
Código Delphi
[-]
QTemp.SQL.Text := 'Select campo1 From BD';
QTemp.Active := True;
While not QTemp.Eof do
begin
Combobox1.Items.Add(QTemp.Fields[0].Text);
QTemp.Next;
end;
QTemp.Active := False;
QTemp.SQL.Text := 'Select campo2 From BD';
QTemp.Active := True;
While not QTemp.Eof do
begin
Combobox2.Items.Add(QTemp.Fields[0].Text);
QTemp.Next;
end;
QTemp.Active := False;
QTemp.SQL.Text := 'Select campo3 From BD';
QTemp.Active := True;
While not QTemp.Eof do
begin
Combobox3.Items.Add(QTemp.Fields[0].Text);
QTemp.Next;
end;
QTemp.Active := False;
Bien, ahora que sigue?.
Saludos