Application - Como saber se nao esta sendo usada |
Top Previous Next |
//Como verificar que sua aplicação não está sendo utilizada //Voce pode testar, caso sua aplicacao tenha um unico formulario, o evento OnDeactivate do formulario. //Mas, o melhor mesmo eh com a aplicacao. //Digite o seguinte codigo, no formulario principal:
TSeuFormulario = class (Tform) public procedure Desabilitou (Sender : TObject); //Isso voce deve ter notado que deve acrescentar um metodo, manualmente, ao seu formulario.
//A implementacao serah:
procedure TSeuFormulario.Desabilitou (Sender : TObject); Begin {O que voce deseja fazer} End; //No create de seu formulario principal, digite a linha abaixo:
Application.OnDeactivate := Desabilitou; //Pronto. |