Descrição
Conta a quantidade de linhas de um campo memo ou string com múltiplas linhas, considerando um numero máximo de letras por linha, tamanho estimado para caracteres de tabulação, e quebras de linhas CRLF (pulo de linha) dentro do texto. |
Sintaxe
MLCount( <cTexto>,<nLinLen>,<nTabSize>,<lQuebra> ) |
Parâmetros
Par | Nome | Tipo | Descrição | Default | Obg | Ref |
01 |
cTexto | Caracter | Indica o texto com múltiplas linhas para verificar a quantidade de linhas | X | ||
02 | nLinLen | Numérico | Especifica o número de caracteres por linha para que ocorra a quebra de linhas | 79 | ||
03 | nTabSize | Numérico | Define um tamanho para tabulação | 4 | ||
04 | lQuebra | Boolean |
Especifica o comportamento de contagem de linhas quando a ultima palavra não cabe inteira na linha atual. .T. – Coloca a palavra na próxima linha .F. – Quebra a palavra no tamanho da linha e coloca o restante na próxima linha. |
.T. |
Retorno
Retorno | Tipo | Descrição |
nRet | Numérico |
Retorna o número de linhas da string considerando os parâmetros de formatação informados |
Exemplo
User Function MLCount() Local cTexto := 'UniversoADVPL Eurai Rapelli ' cTexto += 'UniversoADVPL 01 Eurai Rapelli 01 ' cTexto += 'UniversoADVPL 02 Eurai Rapelli 02 ' MsgInfo( 'MLCount: ' + cValtoChar( MLCount(cTexto, 15 ) ), 'UniversoADVPL' ) Return( Nil )
Resultado
Informações adicionais
Usar função MemoLine em paralelo. |
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎