FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
No funciona boton
Hola amigos:
Estoy peleandome con un form en el cual tengo un boton para salir, el cual se inhabilita (no funciona) cuando entro en un TEdit en el cual tengo un codigo como este en el evento OnExit Código Delphi [-] procedure TFprincipal.ECuentaExit(Sender: TObject); begin If (Length((Sender As TEdit).Text) < 10) OR ((Sender As TEdit).Text='') Then (Sender As TEdit).SetFocus; end; ¿Como puedo hacer que no se inhabilite el boton y pueda salir del formulario aunque este en este Edit, ya que usuario se queja que tiene que rellenar los datos y luego pulsar el boton salir. Gracias por vuestra ayuda. |
#2
|
||||
|
||||
btSalir es el boton qe usas para la salida, lo escribi de memoria pero deberia funcionar
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#3
|
||||
|
||||
Si con "se inhabilita" te refieres a que pierde el foco, pues creo que con el ratón podría hacerle clic.
Sino, prueba con esto:
Quito lo de Text='' porque lógicamente si no tiene texto, Lenght es menor que diez seguro Salu2. |
#4
|
|||
|
|||
Hola...
A mi me parece que estás haciendo en un mal lugar tu validación de datos... Podrías hacerla desde el evento OnCloseQuery de la forma o si es para base de datos, en el evento BeforePost del DataSet que vayas a afectar. Saludos... |
#5
|
||||
|
||||
Parece que eduarcol se me adelantó... esta lenta conexión...
Por cierto, eduarcol, uno de los debería estar atento a los mensajes de enecumene.... |
#6
|
||||
|
||||
Oye! me tienen en la mira! que problema. .
__________________
Mi BLOG - ¡Joder, leanse la guia de estilo! Las Palabras son enanas, los ejemplos gigantes. |
#7
|
||||
|
||||
Yo tendría cuidado con ese Edit, por el nombre, igual guarda el número de cuenta bancaria, contabilidad, etc, si no se escribe al completo puedes guardar inconsistencias en la BD
Lo más fácil, dejar que pulse el botón, si el Edit tiene menos de 10 letras, avisas al usuario en el OnCloseQuery y abortas el guardado del registro. Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
#8
|
||||
|
||||
Hola amigos:
gracias por las ideas. cuando digo se inhabilita quiero decir que al pulsar click con el raton no funciona. O sea no cierra el formulario. En cuanto a lo de inconsistencias no habra ninguna ya que en este caso quiero salir sin grabar, simplemente quiero salir del formulario encontrandome en la edicion del TEdit, cosa que no me deja y solo puedo salir pulsando la tecla <ESC> Ya se que no es grave pero me gustaria darle una solucion elegante. Tambien podria dejar que introdujera los caracteres que le de la gana y al final realizar la comprobacion, es otra posibilidad. |
#9
|
||||
|
||||
Creo que la solución de Lepe es la mejor. Quitas eso de que Length<10 y haces una comprobación antes de salir. Si le das al botón salir, pues sencillamente no comprueba nada: sale y punto. Y si le da al botón "Grabar", pues comprueba que todos los datos son correctos.
Salu2. |
#10
|
||||
|
||||
Ok.
Esta hecho asi, creo que no tendre problemas Gracias pro las ideas aportadas. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Boton Presionado | mjjj | Varios | 2 | 11-10-2007 22:27:51 |
Boton en php | halizia | HTML, Javascript y otros | 9 | 27-03-2007 14:17:00 |
Imagen en Boton | tarco35 | Varios | 1 | 30-09-2006 17:42:30 |
Jpg en un botón | Novás | Varios | 3 | 30-10-2003 15:40:09 |
El boton Refresh no Funciona en IBO | Michel | Firebird e Interbase | 0 | 12-08-2003 19:42:26 |
|