Delphi - Problema con DBLookupCombobox

 
Vista:

Problema con DBLookupCombobox

Publicado por Sebastian (3 intervenciones) el 17/05/2005 23:10:40
Tengo un DBLookupComboBox que usa dos stores como DataSource y ListSource. El del DataSource hace:
- Select IdPersonal, IdTitulo, IdInstitucionEducativa From EstudiosXPersonal.
Y el del ListSource hace:
- Select * From Titulos
El PROBLEMA ES que en tiempo de ejecucion al desplegar el combo muestra todos los titulos cargados en la BD pero no me deja seleccionar ninguno.

Los dos stores estan Activos. Y las propiedades DataField, DataSource, KeyField, ListField y ListSource estan asignadas asi: IdTitulo, dsSpEstudiosXPersonal, IdTitulo, Titulo y dsSpTitulos

Desde ya gracias!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problema con DBLookupCombobox

Publicado por eleuterio (1 intervención) el 12/05/2006 20:33:50
ay primo lo que debes hacer es eliminar el list sourse de tu properties object inspector
para dejar el siguente codigo

procedure TForm5.Button6Click(Sender: TObject);
begin
edit15.Text:='';
datamodule1.actualiza;
edit3.Visible:=true;
panel1.Visible:=false;

end;

procedure TForm5.Button7Click(Sender: TObject);
begin
edit1.Text:=dbedit3.Text;
edit3.visible:=true;
panel1.Visible:=false;
button1.Click;
end;

procedure TForm5.DBGrid1DblClick(Sender: TObject);
begin
edit3.visible:=true;
button7.Click;
end;

procedure TForm5.Button8Click(Sender: TObject);
begin
if edit1.Text <>'' then
begin
ibquery6.Active:=false;
ibquery6.SQL.Clear;
ibquery6.SQL.Text:='delete from datos_generales where cve_datos='+label19.Caption;
ibquery6.Active:=true;
datamodule1.actualiza;
showmessage('su registro fue eliminado');
limpiar;
ibquery6.Active:=false;
end
else
showmessage('Debe insertar el numero de registro a eliminar');
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar