Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Pagetitle

...

Classe TSimpleEditor

Classe

...

TSimpleEditor

Cria

...

um

...

objeto

...

do

...

tipo

...

editor

...

de

...

texto

...

simples.

Hierarquia

...

...

    • TSimpleEditor

Construtores

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

Propriedades

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

Métodos

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

Observações

  • O componente TSimpleEditor permite a exibição e edição de textos planos ou formatados em HTML que podem ser carregados com o método LoadText() e recuperados através do método RetText(). O componente não trabalha com gerenciamento de arquivos (txt, rtf, doc, etc).

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
	#include "totvs.ch"
	user function exemplo()
		local oDlg := nil, oEdit := nil
		

Create

Método construtor da classe.

TSimpleEditor(): Create ( [ oWnd] ) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  

 

oObjeto
    (objeto)
  • Retorna o objeto criado.
oEdit := TSimpleEditor():Create( oDlg )

New

Método construtor da classe.

TSimpleEditor(): New ( [ nRow], [ nCol], [ oWnd], [ nWidth], [ nHeight], [ cText], [ lReadOnly] ) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
cTextCaracterIndica o texto que será apresentado na inicialização do objeto.  
lReadOnlyLógicoIndica se, verdadeiro (.T.), o texto não pode ser editado; caso contrário, falso (.F.).  
bSetGetBloco de códigoIndica o bloco de código, no formato {|u| if( Pcount( )>0, := u, ) }, que será executado
para atualizar a variável (essa variável deve ser do tipo caracter). Desta forma, se a lista
for sequencial, o controle atualizará com o conteúdo do item selecionado, se for indexada,
será atualizada com o valor do índice do item selecionado.
  
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada
na exibição do conteúdo do controle visual.
  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada
de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação:
O bloco de código retornará verdadeiro (.T.) se o controle permanecer habilitado; caso
contrário, retornará falso (.F.).
  
bValidBloco de código

Indica o bloco de código de validação que será executado quando o conteúdo do
objeto for modificado. Retorna verdadeiro (.T.), se o conteúdo é válido; caso contrário,
falso (.F.).

  

 

oObjeto
    (objeto)
  • Retorna o objeto criado.
oEdit := TSimpleEditor():New( 0,0,oDlg,260,184 )

Load

Carrega um texto para o editor.

TSimpleEditor(): Load ( [ cTexto] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
cTextoCaracterIndica o texto que inicializará o editor.  

 

oEdit:Load( "Novo texto <b>Negrito</b>"+;            "<font color=red> Texto em Vermelho</font>" +;            "<font size=14> Texto com tamanho grande</font>" )

RetText

Retorna uma string com o conteúdo do editor.

TSimpleEditor(): RetText ( ) --> cRet

cRet
    (caracter)
  • Retorna uma string com o conteúdo do editor.
oEdit:RetText()     // Result: "Teste de texto, teste de texto, teste de texto"

RetTextSel

Retorna uma string com o conteúdo selecionado do editor.

TSimpleEditor(): RetTextSel ( ) --> cRet

cRet
    (caracter)
  • Retorna uma string com o conteúdo selecionado do editor.
oEdit:RetTextSel()   // Result: "Texto selecionado"

TextAlign

Define o tipo de alinhamento do texto.

TSimpleEditor(): TextAlign ( [ nAlign] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nAlignNuméricoIndica o tipo de alinhamento do texto, sendo: 1-À esquerda, 2-À direita, 3-Centralizado e 4-Justificado.  

 

oEdit:TextAlign( 3 )

TextBold

Aplica o estilo negrito no texto.

TSimpleEditor(): TextBold ( ) -->

Este método inverte o status do texto selecionado. Se o negrito estiver ligado, a chamada do método o desligará e vice-versa.

oEdit:TextBold()

TextFamily

Aplica um tipo de fonte no texto.

TSimpleEditor(): TextFamily ( [ cFamily] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
cFamilyCaracterIndica o nome da fonte que será utilizada na seção do texto.  

 

oEdit:TextFamily( "Courier New" )

TextColor

Aplica uma cor no texto.

TSimpleEditor(): TextColor ( [ nColor] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nColorNumericoIndica a cor do texto. X 

 

oEdit:TextColor(CLR_HRED)
TextFormat

TextFormat

Define o formato do texto.

TSimpleEditor(): TextFormat ( [ nFormat] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nFormatNuméricoIndica o formato do texto, sendo: 1 = Html e 2 = Plain Text.  

 

oEdit:TextFormat( 1 )

TextItalic

Aplica o estilo itálico no texto.

TSimpleEditor(): TextItalic ( ) -->

Este método inverte o status do texto selecionado. Se o itálico estiver ligado, a chamada do método o desligará e vice-versa.

oEdit:TextItalic()

TextSize

Aplica o tamanho da fonte no texto.

TSimpleEditor(): TextSize ( [ nSize] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nSizeNuméricoIndica o tamanho da fonte que será utilizada na seção do texto.  

 

oEdit:TextSize( 26 )

TextStatus

Retorna um array com as propriedades do texto posicionado.

TSimpleEditor(): TextStatus ( ) --> aRet

aRet
    ()
  • Retorna um array com as propriedades do texto, sendo: 1-Lógico negrito, 2-Lógico itálico, 3-Lógico sublinhado, 4-Caracter RGB da cor, 5-Caracter tamanho da fonte e 6-Caracter fonte.
oEdit:TextStatus()   // Result: {.F., .F., .F., 0, -1, "Arial"}

TextStyle

Define o estilo do parágrafo.

TSimpleEditor(): TextStyle ( [ nStyle] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nStyleNuméricoIndica o estilo do parágrafo que será utilizado na seção do texto, sendo: 1-Normal, 2-Disco (Bullet), 3-Círculo (Bullet), 4-Quadrado (Bullet), 5-Ordem decimal, 6-Ordem alfanumérica minúsculo e 7-Ordem alfanumérica maiúsculo.  

 

oEdit:TextStyle( 4 )
Exemplo do método TextStyle
Image Removed

TextUnderline

Aplica o estilo sublinhado no texto.

TSimpleEditor(): TextUnderline ( ) -->

Este método inverte o status do texto selecionado. Se o sublinhado estiver ligado, a chamada do método o desligará e vice-versa.

oEdit:TextUnderline()
#include "TOTVS.CH"User Function TSimpleEditor()
DEFINE DIALOG oDlg TITLE "
Exemplo TSimpleEditor
tSimpleEditor" FROM 180, 180 TO 550, 700 PIXEL

		oEdit := 
TSimpleEditor
tSimpleEditor():New(
0, 0, oDlg, 260, 184
)
)
		oEdit:Load(
"Novo texto <b>Negrito</b>" +
;
 ;
			"<font color=red> Texto em Vermelho</font>" +
;
 ;
			"<font size=14> Texto com tamanho grande</font>"
)
)
		ACTIVATE DIALOG oDlg CENTERED
Return
Exemplo da classe TSimpleEditor
Image Removed
Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
 

	return

Resultado do Exemplo

Image Added