import.css=/download/attachments/327912/newLayout.css
A implementação de uma classe em TLPP deve seguir as seguintes etapas:

1.  incluir arquivo de cabeçalho tlpp-core.th (recomendado, porém facultativo para classes migradas de AdvPL)
2.  definir o nome da classe
3.  declarar propriedades
4.  declarar métodos
5.  implementar os métodos




  • Para todo fonte escrito em TLPP, é recomendado incluir o arquivo "tlpp-core.th"; 
  • O processo de extração desse "th", bem como de todos os demais arquivos de cabeçalho de TLPP, pode ser feito pelo seguinte processo: TLPP - Ambiente de compilação.



#include "tlpp-core.th" 


#include "tlpp-core.th"

Class MyClass
EndClass
#include "tlpp-core.th"
Class MyClass
   private data nValue as numeric
   private data cValue as character
EndClass



#include "tlpp-core.th"
Class MyClass
   private data nValue as numeric
   private data cValue as character

   public method New()
   public method getNumber() as numeric
   public method getText() as character
   public method setNumber(n)
   public method setText(c)
EndClass
#include "tlpp-core.th"

Class MyClass
   private data nValue as numeric
   private data cValue as character
 
   public method New()
   public method getNumber() as numeric
   public method getText() as character
   public method setNumber(n)
   public method setText(c)
EndClass
 
Method New() class MyClass
Return Self
 
Method getNumber() as numeric class MyClass
Return ::nValue
 
Method getText() as character class MyClass
Return ::cValue
 
Method setNumber(n) class MyClass
   ::nValue := n
Return
  
Method setText(c) class MyClass
   ::cValue := c
Return