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.
TSrvObject -> TControl -> TSay
Propriedade | Descrição | Tipo |
lTransparent | Indica 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 |
lWordWrap | Indica 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:= TSay():New(01,01,{||'Texto para exibição'},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
Advanced Protheus 6.09
,
Advanced Protheus 7.10
,
Microsiga Protheus 8.11
,
Microsiga Protheus 11
,
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas