PC Toledo • Método oposto ao Init()

Página 1 de 1

Método oposto ao Init()

Enviado: 29 Mar 2013 21:05

por JoséQuintas

Tem algum método oposto ao Init() ?
Supondo que fosse EXIT, seria pra ser usado como neste exemplo.

Código: Selecionar todos

LOCAL oVar
oVar := classe():New()
RETURN

CREATE CLASS classe
   METHOD Init()
   METHOD Exit() // supondo
   END CLASS

METHOD Init() CLASS classe
   Aadd( MySystem:Forms, SELF )
   RETURN NIL

METHOD Exit() CLASS classe
   aSize( MySystem:Forms, Len( MySystem:Forms ) - 1 )
   RETURN NIL

Método oposto ao Init()

Enviado: 29 Mar 2013 22:01

por alxsts

Olá!

Pesquise por DESCTRUCTOR na documentação do [x]Harbour.