Histórico da Página

...

Portuguese

Pagetitle

	MemoLine
	MemoLine

Colapse ALL

Expand ALL

Função: MemoLine

Retorna

o

conteúdo

de

um

campo,

do

tipo

memo

,

ou

string

com

múltiplas

linhas.

Sintaxe

Bloco de código

collapse	false

MemoLine( <

cText>

 cText >, [ nLineLength ], [ nLineNumber ]

) --> cText Parâmetros/Elementos

, [ nTabSize ], [ lWrapWord ] )

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
cText

Caracter

caractere	Indica o texto com múltiplas linhas para filtro.	X
nLineLength

Numérico

numérico	Indica o tamanho máximo que será retornado da linha.
nLineNumber

Numérico

numérico	Indica o número da linha que será retornada.
nTabSize	numérico	Indica o tamanho da tabulação que será usada
lWrapWord	lógico	Indica se apenas palavras inteiras devem ser consideradas no retorno

Retorno

Nome	Tipo	Descrição
cText

(caracter)

caractere

Retorna o conteúdo desejado do texto.

Exemplos

// Cria campo com múltiplas linhas para testecLine := "Linha 01 Linha 01 Linha 01 Linha 01 "+CRLFcLine += "Linha 02 Linha 02 Linha 02 Linha 02 "+CRLF //----------------------------------------------// 1o - Faz leitura de toda a linha//----------------------------------------------// Lê a primeira linhacLinha01 := MemoLine( cLine,,1 ) // Lê a segunda linhacLinha02 := MemoLine( cLine,,2 ) // ExibeMsgAlert( "Linha 01-> " + cLinha01 + CRLF +; "Linha 02-> " + cLinha02 )//----------------------------------------------// 2o - Faz leitura definindo largura da linha//----------------------------------------------// Lê a primeira linha [14 Caracteres]cLinha01 := MemoLine( cLine, 14, 1 ) // Lê a segunda linha [14 Caracteres]cLinha02 := MemoLine( cLine, 14, 2 ) // ExibeMsgAlert( "Linha 01-> " + cLinha01 + CRLF +; "Linha 02-> " + cLinha02 )

'

Bloco de código

language	cpp
theme	Eclipse
linenumbers	true
collapse	false

User Function Exemplo()
  local cLinha := "123"+Chr(9)+"45"+CRLF+"6789"
  local cRes

  cRes := MemoLine(cLinha, 6, 1, 2, .f.) //"123  4"
  cRes := MemoLine(cLinha, 6, 1, 2, .t.) //"123   "
  cRes := MemoLine(cLinha, 7, 1, 3, .f.) //"123   4"
  cRes := MemoLine(cLinha, 7, 1, 3, .t.) //"123    "
  cRes := MemoLine(cLinha, 6, 2, 2, .f.) //"5     "
  cRes := MemoLine(cLinha, 6, 2, 2, .t.) //"45    "
  cRes := MemoLine(cLinha, 7, 2, 3, .f.) //"5      "
  cRes := MemoLine(cLinha, 7, 2, 3, .t.) //"45     "
  cRes := MemoLine(cLinha, 12, 2, 3, .f.) //"6789        "
  cRes := MemoLine(cLinha, 12, 2, 3, .t.) //"6789        "

Return

Abrangência

Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

Árvore de páginas

Versões comparadas

Versão antiga 2

Nova versão Atual

Chave