Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   DBGrid Con Lookup,PickList (https://www.clubdelphi.com/foros/showthread.php?t=11729)

jmedina 23-06-2004 18:27:25

DBGrid Con Lookup,PickList
 
Que Tal a todos:
Vi un Hilo Lookup en un DBGRID, si lo entendi a la perfeccion, que se manejara el PickList para los valores del lookup que esta manejando, yo tambien he hecho eso, pero lo que no puedo hacer es que ese lookup muestre los tres valores que estan en los campos anteriores de esa misma fila(PRECIO1,PRECIO2,PRECIO3) y de aqui elegiur por ejemplo el mas alto para ese campo en especifico (PRE_REAL)de esa linea de registro como es que le pueda hacer.

Espero que puedas ayudar te lo agradecerles de antemano, y una pregunta mas como puedo conseguir el CD rom del CLUB ya que el linck esta desactivado, y quiero saber el costo asi como la seguridad de que lo pueda tener.

Gracias a Todos

JMEDINA

roman 23-06-2004 21:16:35

Vamos a ver, no sé qué tan eficiente resulte pero al parecer funciona.

El punto aquí es que los valores del PickList cambian de registro a registro así que debemos llenar la lista según el registro en el que estemos. Primero pensé en el evento AfterScroll pero tiene dos problemas: funciona si nos movemos sobre un registro ya existente pero no si estamos insertando uno nuevo, y además estaríamos actualizando el PickList incluso si no entramos a editar el campo. Así que opto por el evento OnCellClick del DBGrid:

Código Delphi [-]
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
  if Column.Title.Caption = 'PRE_REAL' then
  begin
    Column.PickList.Clear;
    Column.PickList.Add(Table1.FieldByName('PRECIO1').AsString);
    Column.PickList.Add(Table1.FieldByName('PRECIO2').AsString);
    Column.PickList.Add(Table1.FieldByName('PRECIO3').AsString);
 end;
end;

// Saludos

jmedina 30-06-2004 06:28:21

Perdon por no contestar, pero ando medio atareado, gracias roman funciono a la perfeccion claro con unas modificaciones que le hices pero el cogido es tuyo, una ves mas gracias por la ayuda


Jmedina


La franja horaria es GMT +2. Ahora son las 10:37:58.

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