Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   CAmpos de dbGRid (https://www.clubdelphi.com/foros/showthread.php?t=15469)

Mario1980 24-10-2004 21:03:58

CAmpos de dbGRid
 
Hola tengo un dbgrid al que le agrego datos en uno de los campos de la tabla se ingresan numeros, lo que necesito es que cuando ingreso un valor en este campo si el valor ingresado ya existe en la tabla me mande un mensaje de error advirtiendo del problema yque no me deje ir de ese campo hasta que ingrese un valor correcto.
Muchas gracias para quien me ayude.

marcoszorrilla 24-10-2004 21:08:06

Pues no tienes más que indexar por este campo con clave única y el propio motor de la base de datos lanzará un error en este caso y no te dejará seguir hasta que teclees otro número o canceles el actual.

Un Saludo.

Mario1980 26-10-2004 12:03:20

imposible
 
Hola, eso que decis de indexar la tabla no se puede.
Te explico porque:
Tengo una tabla maestra y otra detalle, por cada fila de la maestra muestra un contenido en la de detalle, por ejemplo linea 1 de la tabla maestra en la de detalle muestra en la columna que tiene numeros... 1,2,3
linea 2 de la maestra en la detalle muestra 1, 2.
por eso no puedo indexar, tengo que hacer que para cada linea del maestro no se repita el numero en la de detalle.
Espero haber sido mas claro y gracias!

basti 26-10-2004 12:59:38

Hola.

Si tu motor de base de datos admite BookMarks, podrías guardar la posición, comprobar si el número existe mediante locate y en caso de que exista mostrar el mensaje de error y borrarlo.

Otra solución sería utilizar el evento onValidate del campo que quieres comprobar, pero tendrías que clonar la tabla para poder comprobar que el valor ya existe.

un saludo

Mario1980 26-10-2004 20:52:52

hola
 
les agradezco su ayuda pero una pregunta es recomendable clonar una tabla para verificar un dato?, si la tabla tuviera 500 o 1000 datos... valdria la pena?.
Saludos si se les ocurre otra cosa, por favor ayuda, estoy escribiendo esto de rodillas!!!!

roman 26-10-2004 21:08:57

Me parece que la respuesta de marcoszorrilla puede aplicarse a tu caso. Lo único que necesitas es crear un índice único en la tabla detalle que se forme con la llave de la tabla maestra y el campo que te interesa:

maestra = (id, ... )
detalle = (id, maestra_id, numero, ... )

Si creas un índice único en detalle formado por los campos maestra_id y numero, entonces, para una misma línea de la tabla maestra, el valor en el campo numero de la tabla detalle no podrá repetirse.

Todo esto es mucho más eficiente ya que será el mismo motor de bases de datos el encargado de detectar las repeticiones.

// Saludos

Mario1980 29-10-2004 14:32:09

Hola
 
Esa solucion ya se me habia ocurrido, pero... no existe otra solucion?
porque estas mismas tablas son usadas en otro lenguaje llamado Paradox y en este programa funcionan bien, solo queria saber si existe una solucion para ejecutar cuando el programa este corriendo, sin modificar tablas.
Gracias!!!!

Mario1980 30-10-2004 16:26:23

hola
 
Se me olvido decir que uso delphi 2, por favor AYUDA!!!!!!!!!

Lepe 31-10-2004 02:01:34

Espero que en Delphi2 esté el Lookup :
Código Delphi [-]
if Vartype( tabla.Lookup('nombreCampo', ValorqueTieneElcampo,'Campoquehadedevolver')) in [varNull] then
 // pues no existe ese valor en la tabla
else
  // pos si que existe cuñao

añade Uses Variants;

Saludos

Mario1980 31-10-2004 03:34:12

gracias
 
Gracias Lepe intentare implementar esto. y .. Que viva España!, si sos español, que se yo.
:D


La franja horaria es GMT +2. Ahora son las 11:08:19.

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