Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Amarrar documentação com o exemplo do comando @ .. SAY
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Pagetitle

...

...

Classe TSay
Classe

...

TSay

Cria

...

um

...

objeto

...

do

...

tipo

...

label. Desta

...

forma,

...

o

...

objeto

...

apresentará

...

o

...

conteúdo

...

do

...

texto

...

estático

...

sobre

...

uma

...

janela

...

ou

...

controle

...

visual.

Hierarquia

...

...

    • TSay

Construtores

Inclusão de trecho
Classe TSay - Construtores
Classe TSay - Construtores
nopaneltrue

Propriedades

Inclusão de trecho
Classe TSay - Propriedades
Classe TSay - Propriedades
nopaneltrue

Métodos

Inclusão de trecho
Classe TSay - Métodos
Classe TSay - Métodos
nopaneltrue

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
 #include "TOTVS.CH"
 
 User Function TSay()
  DEFINE DIALOG oDlg TITLE "Exemplo TSay" FROM 180,180 TO 550,700 PIXEL
  
  // Cria Fonte para visualização
  oFont := 

Create

Método cosntrutor da classe.

TSay(): Create ( [ oWnd], [ bText], [ nRow], [ nCol], [ cPicture], [ oFont], [ uParam7], [ uParam8], [ uParam9], [ lPixels], [ nClrText], [ nClrBack], [ nWidth], [ nHeight], [ uParam15], [ uParam16], [ uParam17], [ uParam18], [ uParam19], [ uParam20] ) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
oWndArray of RecordIndica a janela ou controle visual onde o objeto será criado.  
bTextArray of RecordIndica o bloco de código que será executado para retornar e apresentar uma string.  
nRowArray of RecordIndica a coordenada vertical em pixels ou caracteres.  
nColArray of RecordIndica a coordenada horizontal em pixels ou caracteres.  
cPictureArray of RecordIndica a máscara de formatação, do conteúdo, que será apresentada.  
oFontArray of RecordIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.  
uParam7Array of RecordCompatibilidade.  
uParam8Array of RecordCompatibilidade.  
uParam9Array of RecordCompatibilidade.  
lPixelsArray of RecordIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
nClrTextArray of RecordIndica a cor do texto do objeto.  
nClrBackArray of RecordIndica a cor de fundo do objeto.  
nWidthArray of RecordIndica a largura em pixels do objeto.  
nHeightArray of RecordIndica a altura em pixels do objeto.  
uParam15Array of RecordCompatibilidade.  
uParam16Array of RecordCompatibilidade.  
uParam17Array of RecordCompatibilidade.  
uParam18Array of RecordCompatibilidade.  
uParam19Array of RecordCompatibilidade.  
uParam20Array of RecordCompatibilidade.  

 

oObjeto
    ()
  • Retorna o objeto criado.
oSay:= TSay():Create(oDlg,{||'Texto para exibição'},20,01,,oFont,,;                     ,,.T.,CLR_RED,CLR_WHITE,200,20)

New

Método construtor da classe.

TSay(): New ( [ nRow], [ nCol], [ bText], [ oWnd], [ cPicture], [ oFont], [ uParam7], [ uParam8], [ uParam9], [ lPixels], [ nClrText], [ nClrBack], [ nWidth], [ nHeight], [ uParam15], [ uParam16], [ uParam17], [ uParam18], [ uParam19], [ lHTML] ) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
bTextBloco de códigoIndica o bloco de código que será executado para retornar e apresentar uma string.  
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
cPictureCaracterIndica a máscara de formatação, do conteúdo, que será apresentada.  
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.  
uParam7LógicoCompatibilidade.  
uParam8LógicoCompatibilidade.  
uParam9LógicoCompatibilidade.  
lPixelsLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
nClrTextNuméricoIndica a cor do texto do objeto.  
nClrBackNuméricoIndica a cor de fundo do objeto.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
uParam15LógicoCompatibilidade.  
uParam16LógicoCompatibilidade.  
uParam17LógicoCompatibilidade.  
uParam18LógicoCompatibilidade.  
uParam19LógicoCompatibilidade.  
lHTMLLógicoIndica se, verdadeiro (.T.), habilita a visualização do texto no formato HTML; caso contrário, falso (.F.).  

 

oObjeto
    ()
  • Retorna o objeto criado.
oSay:= TSay():New(01,01,{||'Texto para exibição'},oDlg,,,,;                  ,,.T.,CLR_RED,CLR_WHITE,200,20)

CtrlRefresh

Força a atualização do objeto.

TSay(): CtrlRefresh ( ) -->

oSay:CtrlRefresh()

SetText

Altera o texto que será apresentado pelo objeto.

TSay(): SetText ( [ xVal] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
xValQualquerIndica o texto que será apresentado. Observação: O tipo de dado desse parâmetro pode ser: Caracter, Numérico e Data.  

 

oSay:SetText( "Novo Texto" )

 

PropriedadeDescriçãoTipo
lTransparentIndica se a cor de fundo, do objeto, deve ser ignorada. Desta forma, o objeto assumirá o conteúdo ou a cor do controle visual ao fundo. Observação: O conteúdo padrão desse parâmetro é verdadeiro (.T.).Lógico
lWordWrapIndica se, verdadeiro (.T.), o texto será dividido em várias linhas para enquadrar o conteúdo, na área determinada, do objeto. Observação: O conteúdo padrão desse parâmetro é falso (.F.).Lógico

 

#include "TOTVS.CH"

User Function TSay()
DEFINE DIALOG oDlg TITLE "Exemplo TSay" FROM 180,180 TO 550,700 PIXEL
// Cria Fonte para visualização
oFont :=
TFont():New('Courier new',,-18,.T.)

  
  // Usando o método
New
oSay
 New
  oSay1:= TSay():New(01,01,{||'Texto para exibição I'},oDlg,,oFont,,,,.T.,CLR_RED,CLR_WHITE,200,20)


   
  // Usando o método Create


  oSay:= TSay():Create(oDlg,{||'Texto para exibição'},20,01,,oFont,,,,.T.,CLR_RED,CLR_WHITE,200,20
)

ACTIVATE DIALOG oDlg CENTERED
Return

Exemplo da classe TSay
Image Removed
)
 
  // Métodos
  oSay:CtrlRefresh()

  oSay:SetText( "Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto Novo Texto " )
  
  oSay:SetTextAlign( 2, 2 )

  // Propriedades
  oSay:lTransparent = .T.
 
  oSay:lWordWrap = .F.
 
 ACTIVATE DIALOG oDlg CENTERED
 Return

Resultado do Exemplo

Image Added

Referências

A construção de um componente da classe TSAY() também pode ser feita através do comando AdvPL @ .. SAY 

Abrangência

Advanced Protheus 6.09 ,Advanced Protheus 7.10, Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, ByYou Application Server

...

...