sábado, 6 de junho de 2009

Como verificar que sua aplicação não está sendo utilizada?

{Você pode testar, caso sua aplicação tenha um único formulário, o evento OnDeactivate do formulário. Mas, o melhor mesmo é com a aplicação.

Digite o seguinte código, no formulário principal:}


TSeuFormulario = class (Tform)
public
procedure Desabilitou (Sender : TObject); {Isso voce deve ter notado que deve acrescentar um método, manualmente, ao seu formulário.

A implementação será:}


procedure TSeuFormulario.Desabilitou (Sender : TObject);
Begin
{O que voce deseja fazer}
End; //No create de seu formulário principal, digite a linha abaixo:

Application.OnDeactivate := Desabilitou;

Nenhum comentário:

Postar um comentário