Classe de label.
Hierarquia
tSrvObject -> tControl -> tSay
Descrição
O objeto tipo tSay exibe o conteúdo de texto estático sobre uma janela ou controle.
Parâmetros
| lWordWrap | Lógico. Se .T. quebra o texto em várias linhas de maneira a enquadrar o conteúdo na área determinada para o controle, sendo o padrão .F. |
| lTransparent | Lógico. Se .T. a cor de fundo do controle é ignorada assumindo o conteúdo ou cor do controle ou janela ao fundo, sendo o padrão .T. |
Métodos
New
Descrição
Método construtor do controle.
Sintaxe
New([anRow], [anCol], [abText], [aoWnd], [acPicture], [aoFont], [lPar7], [lPar8], [lPar9], [alPixels], [anClrText], [anClrBack], [anWidth], [anHeight], [lPar15], [lPar16], [lPar17], [lPar18], [lPar19])
Parâmetros
| AnRow | Numérico, opcional. Coordenada vertical em pixels ou caracteres. |
| AnCol | Numérico, opcional. Coordenada horizontal em pixels ou caracteres. |
| AbText | Codeblock, opcional. Quando executado deve retornar uma cadeia de caracteres a ser exibida. |
AoWnd | Objeto, opcional. Janela ou diálogo onde o controle será criado. |
acPicture | Caractere, opcional. Picture de formatação do conteúdo a ser exibido. |
AoFont | Objeto, opcional. Objeto tipo tFont para configuração do tipo de fonte que será utilizado para exibir o conteúdo. |
lPar7 | Reservado. |
lPar8 | Reservado. |
lPar9 | Reservado. |
AlPixels | Lógico, opcional. Se .T. considera coordenadas passadas em pixels se .F., padrão, considera as coordenadas passadas em caracteres. |
anClrText | Numérico, opcional. Cor do conteúdo do controle. |
anClrBack | Numérico, opcional. Cor do fundo do controle. |
anWidth | Numérico, opcional. Largura do controle em pixels. |
anHeight | Numérico, opcional. Altura do controle em pixels. |
| lPar15 | Reservado. |
lPar16 | Reservado. |
| lPar17 | Reservado. |
lPar18 | Reservado. |
lPar19 | Reservado. |
Retorno
O controle criado.
SetText
Descrição
Modifica o conteúdo a ser exibido pelo controle.
Sintaxe
SetText( [xVal] )
Parâmetros
| xVal | Caracter / Numérico / Data, Opcional. Valor a ser exibido. |
Retorno
NIL
Exemplo
#include “protheus.ch”
User Function Teste()
Local oDlg, oSay
DEFINE MSDIALOG oDlg FROM 0,0 TO 200,200 TITLE “My dialog” PIXEL
oSay:= tSay():New(10,10,{||”para exibir”},oDlg,,,,;
,,.T.,CLR_WHITE,CLR_RED,100,20)
ACTIVATE MSDIALOG oDlg CENTERED
Return