Extrai uma linha de uma string ou de um campo memo.
Sintaxe
MEMOLINE( cString, [ nLineLength ], [ nLineNumber ], [ nTabSize ], [ lWrap ]) –> Caracter
| Argumento | Obrigat. | Tipo | Descrição |
| cString | Sim | C | É a string original de onde será extraída a linha. |
| nLineLength | Não | N | Número de caracteres por linha. Caso não especificado, assume 79. |
| nLineNumber | Não | N | Número da linha a ser retornada. Caso não especificado, assume 1. |
| nTabSize | Não | N | Define o número de caracteres para o Tab. Caso não especificado, assume 4. |
lWrap | Não | L | Habilita a quebra de linhas de acordo com as palavras. Caso não especificada, fica habilitado. |
Retorno | Descrição |
| Caracter | Caracter. Retorna a linha solicitada, caso não exista o número de linhas, retorna uma string em branco. |
Descrição
MemoLine() é uma função que retorna uma linha específica. Caso não exista a linha especificada, retorna um string em branco.
Caso a quebra de linhas esteja habilitada (lWrap igual .T.) e a palavra esteja no meio da quebra de linha, esta será colocada na próxima linha.
MemoLine() é usada em conjunto com MLCOUNT() para extrair todas as linhas de um texto.
Exemplos
LOCAL nLineLength := 40, nTabSize := 3, lWrap := .T.
LOCAL nLines, nCurrentLine
//
LOCAL cTexto := MEMOREAD( “Texto.TXT” )
nLines := MLCOUNT(cTexto, nLineLength, nTabSize, lWrap)
//
FOR nCurrentLine := 1 TO nLines
conout (MEMOLINE(CustNotes, nLineLength, nCurrentLine, nTabSize, lWrap))
NEXT