Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Pasar datos a un TJvDBLookupEdit en tiempo de ejecución (https://www.clubdelphi.com/foros/showthread.php?t=91578)

webmasterplc 08-03-2017 06:52:27

Pasar datos a un TJvDBLookupEdit en tiempo de ejecución
 
Buenas, tengo una ventana donde tengo un dbgrid ligado a un query, en el evento doble click hago llamado a un formulario de edicón del campo seleccionado, en dicho formulario tengo edit y TJvDBLookupEdit los edit paso los datos bien, pero al TJvDBLookupEdit le quiero pasar el lockupvalue pero me sigue saliendo en blanco aunque hay datos en la consulta

este es el codigo de llamado
Código Delphi [-]
  with Tformeditarclasificacioncoti.Create(nil) do
  try
   Caption:='Gerenciar Cotización';
   edtcotizacion.Text:=datos.sqcot2.FieldByName('cot_control').AsString;
   edt1.Text:=datos.sqcot2.FieldByName('cl_descripcion').AsString;
   listasector.LookupValue:=datos.sqcot2.FieldByName('cot_sector').Value;
   ShowModal;
  finally
   Free
  end;

bitbow 08-03-2017 16:09:29

el objetivo de usar el TJvDBLookupEdit es obtener un listado de opciones de otra consulta (aunque sea hacia la misma tabla), segun recuerdo ese control lleva una configuracion adicional del segundo dataset (dataset, campo valor y campo llave) adicional al datset y campo principal que es donde almacenara la informacion seleccionada, revisa los ejemplos de los JEDI.

Saludos.

webmasterplc 08-03-2017 16:19:48

la uso de esa manera, pero cuando voy a editar el registro verifico si hay algun valor guardado en el campo y debo pasarlo a ese componente para que me muestre el display

bitbow 08-03-2017 18:26:47

No necesitarias pasarle nada ya que el toma el valor almacenado y muestra el campo asignado a desplegar.

Saludos.

webmasterplc 08-03-2017 19:00:16

la verdad me regresa en blanco y si le doy al boton modificar me actualiza ekl campo en blanco


La franja horaria es GMT +2. Ahora son las 09:34:41.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi