Fórum onexit... #260174

26/11/2004

0

Delphi

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

Responder

Posts

26/11/2004

Biscalquini

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


Responder

Gostei + 0

26/11/2004

Reginaldo174

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


Responder

Gostei + 0

26/11/2004

Paulo_amorim

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é+


Responder

Gostei + 0

27/11/2004

Lucas Silva

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

T+,
Lucas!


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar