condicionar un procedimiento dentro de otro procedimiento

[yossi]

hola necesito ayuda con esto y espero no molestarles ya que he preguntado mucho

tengo un edit en el que tengo el evento onexit activado, en ese evento lo que hago es que cuando se salga del edit me muestre un mensaje que me obligue a ingresar ese datos, por otro lago tengo un boton que se encarga de cerrar el formulario

la pregunta es como hacer para que cuando haga click en el boton, el evento onexit del edit no funcione, es decir que pueda cerrar el formulario sin que me muestre el mensaje de que tengo que ingresar ese dato en el edit.

intente con este codigo pero no funciona, y estoy segura de aque esta mal pero es que no se como hacerlo

Código Delphi [-]procedure tform1.edit1exit(sender:tobject) begin if boton1click=true then edit1exit=false; end;


tambien lo intente de la misma manera desde el procedimiento del boton pero tampoco