Ver Mensaje Individual
  #2  
Antiguo 21-08-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola wull.

Cita:
quiero que al iniciar el programa en el DBLookupComoBox se muestra un texto como “Elija su opción”
No es posible de esa forma, para que lo fuera, en el TDataSet asociado, tendría que existir un registro que contuviera ese texto.

Cita:
o bien que me orienten como puedo hacer para tener un combobox normal pero enlazado a una base datos
Tampoco es posible enlazar un TComboBox a una base de datos, pero podrías hacer algo como:
Código Delphi [-]
...
procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.Items.Clear;
  with Query1 do
  begin
    Open;
    while not Eof do
    begin
      ComboBox1.AddItem(FieldByName('CAMPO_X').AsString,       // campo que se muestra
                        TObject(FieldByName('ID').AsInteger)); // campo clave
      Next;
    end;
    First;
  end;
  ComboBox1.Text := 'Elija su opción';
end;

...

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  if ComboBox1.ItemIndex <> -1 then
    Query1.Locate('ID', Integer(ComboBox1.Items.Objects[ComboBox1.ItemIndex]),[]);
end;
...

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 21-08-2012 a las 20:10:43. Razón: corrección
Responder Con Cita