Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-08-2007
Avatar de saldanaluis
saldanaluis saldanaluis is offline
Miembro
 
Registrado: nov 2006
Ubicación: Monterrey NL México
Posts: 122
Poder: 18
saldanaluis Va por buen camino
Question Poder salir de un campo obligatorio nulo.

Espero me puedan ayudar en este punto.
Tengo una forma con un campo edit en el cual valido en el metodo Edit1.onexit que si es nulo ('') mande un mensaje y vuelava a ser el foco con Edit1.setfocus, pero tambien tengo dos botones en la forma: 1)Btn_OK y 2)Btn_Cancel. Con el boton 2 quiero cerrar la forma sin que valide nada y cancelar todo lo que se ha hecho, pero como Edit1 inicia la forma con el foco, si presiono el boton 2 y no hay nada en Edit1, no me deja salir de la forma. Tengo que poner algo para poder salirme y cerrar la forma, pero si presiono la tecla "Esc" si se cierra la forma y puedo salir, aunque no haya nada en Edit1. ¿Que puedo hacer para que al presionar el boton 2 pueda salirme y cerrar la forma aunque no haya nada en Edit1? El Boton 2 tiene como propiedades ModalResult=mrCancel y Cancel=true.
Gracias de antemano por su valiosa respuesta.
Responder Con Cita
  #2  
Antiguo 15-08-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.557
Poder: 25
egostar Va camino a la fama
Lo mas fácil es asignar el en el evento OnClick del bitbtn2 Close.

Código Delphi [-]
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
  Close;
end;

Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita
  #3  
Antiguo 15-08-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Si aún no es suficiente el codigo que te plantea egostar, haz lo siguiente en la validación que haces en el OnExit del Edit:

Código Delphi [-]
procedure TForm1.Edit1Exit(Sender: TObject);
begin
  if not Button2.Focused then //Esta linea verificara, que no sea el Boton2 quien este recibiendo el foco
     if Edit1.Text = '' then 
        raise Exception.Create('Error: Digite un dato');
end;
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #4  
Antiguo 15-08-2007
Avatar de saldanaluis
saldanaluis saldanaluis is offline
Miembro
 
Registrado: nov 2006
Ubicación: Monterrey NL México
Posts: 122
Poder: 18
saldanaluis Va por buen camino
Asi es. En el evento onclick del boton2 tengo el "Close" pero al presionar el boton 2 ejecuta el evento Edit1.onexit, y ahi verifica que es nulo (''), manda el mensaje y hace al Edit1.SetFocus; por lo que vuelve al Edit1 y espera que le ponga algo. La funcionalidad que necesito es que si presiono el boton 2 no tome en cuenta el evento Edit1.OnExit y pueda cancelar todo y cerrar la forma.
Espero que me haya explicado mejor.
Gracias y saludos...
Responder Con Cita
  #5  
Antiguo 15-08-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Entonces, lo que te he sugerido debe funcionar.
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/

Última edición por jhonny fecha: 15-08-2007 a las 02:14:06. Razón: Quite "te" de la palabra que tenia que era "funcionarte".
Responder Con Cita
  #6  
Antiguo 15-08-2007
Avatar de saldanaluis
saldanaluis saldanaluis is offline
Miembro
 
Registrado: nov 2006
Ubicación: Monterrey NL México
Posts: 122
Poder: 18
saldanaluis Va por buen camino
Muchas gracias. Eso de Button2.Focused funciona de maravilla. ¡Lo que es saber...! Espero algun dia saber una fracción del conocimiento de los miembros del foro.
Gracias nuevamente.
Saludos...
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Consulta a un campo nulo edelphi SQL 1 06-08-2007 22:11:23
consulta para campo fecha en nulo Patricio Varios 2 02-06-2006 16:47:50
Campo con valor nulo fjcg02 Conexión con bases de datos 4 10-11-2004 08:55:07
Insertar campo nulo en un label jrcosta75 Varios 1 06-02-2004 14:35:04
Campo fecha nulo... seb@ Conexión con bases de datos 2 01-10-2003 18:42:48


La franja horaria es GMT +2. Ahora son las 09:21:59.


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