TOTVSTEC

Árvore de páginas

Retorna o conteúdo de um campo, do tipo memo ou string com múltiplas linhas.

Sintaxe

MemoLine( < cText >, [ nLineLength ], [ nLineNumber ], [ nTabSize ], [ lWrapWord ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cText

caractere

Indica o texto com múltiplas linhas para filtro.

X

 

nLineLength

numérico

Indica o tamanho máximo que será retornado da linha.

 

 

nLineNumber

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

caractere

Retorna o conteúdo desejado do texto.

Exemplos'

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

Veja também

  • Sem rótulos