Cabeçalho

MLCount [AS]

Autor: Eurai Criado: 01/01/2016 Atualizado: 25/04/2025 Caracter

Postagem

Descrição

MLCount [AS]

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
mlcount_-_resultado_01