onexit...

Delphi

26/11/2004

Galera estou tentando fazer um modo que ao vc sair do formulario ele
cancele o onexit do edit focado mas depois ele volte a propriedade onexit de
novo. Estou tentando fazer igual no exemplo abaixo mas nao esta dando certo
alguem conhece uma maneira melhor.
(Form.Components[ComponentIndex] as TCustomEdit).onexit:=nil;
ActiveControl:=nil;
(Form.Components[ComponentIndex] as
TCustomEdit).onexit:=(Form.Components[ComponentIndex] as TCustomEdit)Exit;

ou se tem uma forma de quando eu sair do formulario ele destrua o
formulario e ao eu entrar de novo ele cria o formulario como se fosse a
primeira vez que estou entrando.

Agradeço desde ja qualquer ajuda.


Ronaldomr

Ronaldomr

Curtidas 0

Respostas

Biscalquini

Biscalquini

26/11/2004

Se para sair de um form ele clicar num BitBtn, ou Button, é só colocar no onexit do edit:

If BitBtn1.Focused Then
Abort;

Isto antes do seu código neste evento


GOSTEI 0
Reginaldo174

Reginaldo174

26/11/2004

came o form assim :

Application.CreateForm(Tfom1, Form1); // cira o form
Form1.showmodal; // mostra o form
Form1.close; // garante que foi fechado
Form1.Destroy; // destroi o form criado


GOSTEI 0
Paulo_amorim

Paulo_amorim

26/11/2004

Olá

came o form assim : Application.CreateForm(Tfom1, Form1); // cira o form Form1.showmodal; // mostra o form Form1.close; // garante que foi fechado Form1.Destroy; // destroi o form criado


- Se o Form1 passou do comando ShowModal, então com certeza ele já está fechado.
- Não se deve usar o método Destroy [quote:0015fce355=´Help do Delphi´]Do not call Destroy directly. Call Free instead. Free verifies that the component is not nil, and only then calls Destroy[/quote:0015fce355]

Creio que usando o bloco
Form1 := TFOrm1.Create(Self);
Form1.ShowModal;
Form1.Free;

ele deve fazer o que se quer...

Até+


GOSTEI 0
Lucas Silva

Lucas Silva

26/11/2004

Colega,
Procure colocar títulos mais detalhados no seus post´s.

T+,
Lucas!


GOSTEI 0
POSTAR