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, TObject(FieldByName('ID').AsInteger)); 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.