FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Validacion mensaje de texto
Que tal, Acudo nuevamente a ustedes con este problema, tengo el siguiente codigo:
procedure TForm12.Button1Click(Sender: TObject); begin if dbedit1.Text='' then begin showmessage('Falta Fecha'); end; if edit2.Text='' then begin showmessage('Falta Cantidad a Traspasar'); end else if strtoint(edit2.Text) > strtoint(dbedit6.Text) then begin ShowMessage('No puede ser Mayor la cantidad que las existencias') end else begin form12.Table3.Insert; Hace la validacion de en dbedit1, si el siguiente campo (edit2) esta vacio manda el mensaje de error pero tambien inserta en un dbgrid los datos de los dbedti1 y edit2. ¿Alguien sabe por que no hace la validacion correctamente? (solo me mande el mensaje y no inserte nada si es que estan vacios los campos) Saludos Última edición por odrack fecha: 20-02-2008 a las 00:14:14. |
#2
|
||||
|
||||
Sera que te falta un ELSE:
si es solo ese tu codigo, tambien hay begin y ends innecesarios:
PD: usa las etiquetas!!! |
#3
|
|||
|
|||
Gracias, funciona de maravilla!!
Saludos |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Validación de nif | Acker | Varios | 4 | 20-06-2006 13:44:03 |
Validacion | spaike | Varios | 2 | 19-04-2006 19:56:12 |
validacion | halifax | Tablas planas | 7 | 06-02-2005 23:25:53 |
Validacion | Carlex | Conexión con bases de datos | 1 | 08-09-2004 23:53:41 |
Validación C.I.F. | Kafu | Varios | 2 | 23-05-2003 19:09:29 |
|