Á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.).  

 

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