Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-06-2004
jmedina jmedina is offline
Miembro
 
Registrado: jun 2004
Posts: 92
Poder: 20
jmedina Va por buen camino
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
Responder Con Cita
  #2  
Antiguo 23-06-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
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
Responder Con Cita
  #3  
Antiguo 30-06-2004
jmedina jmedina is offline
Miembro
 
Registrado: jun 2004
Posts: 92
Poder: 20
jmedina Va por buen camino
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
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 00:31:55.


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
Copyright 1996-2007 Club Delphi