FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Validar Registro de Datos en una BD
Hola.
Soy nuevo en el foro y he revisado varias post frente a este tema pero después de una larga ausencia de mi parte en delphi, veo que algunas cosas han cambiado y me encuentro atorado en esto que describo a continuación: Tengo un form con varios campos (TDBEdit y TDBLookupComboBox), quiero verificar que si existen campos en blancos, la instrucción de inserción en la base de datos no se ejecute hasta que todos los campos estén diligenciados. he superado el problema en cuanto a validar los TDBEdit pero los TDBLookUpComboBox me da un error. El código que uso es sencillo pero como dije solo me valida los DBEdit. for x := 0 to ComponentCount - 1 do if ((Components[x] is TDBEdit) or (Components[x] is TDBLookupComboBox)) then begin if (((Components[x] as TDBEdit).Text = '') or ((Components[x] as TDBLookupComboBox).Text = '')) then begin ShowMessage ('Campos sin diligenciar' +' '+ QuotedStr(Components[x].Name) ); (Components[x] as TDBEdit).SetFocus; end end else begin TInsercion.BtnClick(nbInsert); end; De igual forma agradezco si podrían ayudarme en validar si el dato es numero o texto. de antemano gracias y disculpas si he repetido el tema, pero no encontré información concreta frente a este inconveniente. |
#2
|
||||
|
||||
Bienvenido a clubdelphi, como siempre aconsejamos a los nuevos, no olvides leer nuestra guía de estilo, gracias por tu colaboración
Y recuerda poner los tags al código fuente, ejemplo: Gracias |
#3
|
|||
|
|||
Frank algo que no tiene que ver con BB DD. Es "if" que colocaste debería estar separado en dos partes dado que estás tratando de evaluar el mismo objeto como dos clase distintas (en principio no debe haber problemas porque ambas deben descender de algo como TCustomEdit, pero el operador "as" es bastante quisquilloso).
En todo caso separa en lugar de if A or B then algo como if A then..... if B then.... Tu problema es en el segundo "if" |
#4
|
|||
|
|||
Gracias por su ayuda y comentarios...pues termine resolviendo el problema sin evaluar los componentes, asi que use una comprobacion directa a la vieja usanza.
y con eso me funciono bien, en cuanto a lo de la validación en el evento keypress de datos lo especifique así:
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Validar la existencia de un registro | lucho1981 | Conexión con bases de datos | 19 | 18-11-2008 17:45:06 |
Validar registro antes de insertar | Moparova | SQL | 10 | 30-10-2008 16:11:42 |
Eliminar Registro (Validar) | UTECYBER | OOP | 8 | 29-10-2008 18:15:13 |
validar registro | jefferson | Internet | 1 | 23-10-2008 20:41:22 |
Recorrer base de datos registro por registro | Goyo | SQL | 3 | 06-09-2006 21:40:47 |
|