RTrim

Tempo de leitura: 2 minutos

A função RTrim remove os espaços em branco à direita de uma string. Ela é também  uma das funções de manipulação de string em ADVPL. 

 

Sintaxe:

RTrim(cString)

 

Parâmetro(s):

Retorno:

 

 

Observações:

  • RTrim está relacionada as funções LTrim, que remove os espaços em branco à esquerda, e a AllTrim, que remove os espaços em branco à esquerda e à direita;
  • O inverso de AllTrimRTrim LTrim são as funções PadCPadR PadL, que centralizam, alinham à direita ou à esquerda as strings, respectivamente, através da inserção de caracteres de preenchimento.

 

Exemplo de RTrim em ADVPL:

#include 'protheus.ch'
#define QLIN Chr(10)+Chr(13)
/*{Protheus.doc} User Function PARTrim
    (Essa função tem por finalidade mostrar a função de Manipulação de String RTrim em ADVPL)
    @type  Function
    @author Adilio Costa
    @since 07/12/2023
    @version Protheus 12.1.2210
   @Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@Conheça os Cursos do ProtheusAdvpl:
https://hotmart.com/pt-br/club/protheusadvpl
|Se esse conteúdo foi útil pra você nos ajude divulgando 
ele e nossas redes sociais!!|
*/

*/
User Function PARTrim()
	Local cString1 := "Blog ProtheusAdvpl  "
    Local cString2 := "Portal ProtheusAdvpl  "
    Local nTamStr1 := Len(cString1)
    Local nTamStr2 := Len(cString2)
    Local cMsg := ""

    cMsg:="Antes de usar RTrim o tamanho da String1 é:"+cValToChar(nTamStr1)+QLIN
    cMsg+="Antes de usar RTrim o tamanho da String2 é:"+cValToChar(nTamStr2)+QLIN
	
    cString1 := RTrim(cString1)
    cString2 := RTrim(cString2)

    //Atualiza os tamanhos de cString1 e cString2 após o uso de RTrim para remoção dos espaços
    nTamStr1 := Len(cString1)
    nTamStr2 := Len(cString2)

    cMsg+="Após usar RTrim o tamanho da String1 é:"+cValToChar(nTamStr1)+QLIN
    cMsg+="Após usar RTrim o tamanho da String2 é:"+cValToChar(nTamStr2)
    
    MsgInfo(cMsg,"Função RTrim")


	

Return

No código ADVPL acima informamos 2 variáveis chamadas cString1 e cString2, as duas variáveis possuem 2 espaços à direita, assim utilizamos a função Len para obter o tamanho dessas duas strings, no caso o tamanho 20 para a cString1 e 22 para cString2, depois utilizamos a função RTrim para remover os espaços em branco tanto da string cString1 quanto da string cString2 e após isso utilizamos novamente a função Len para obter os novos tamanhos dessas duas strings, no caso o tamanho 18(foram removidos os 2 espaços à direita) para a cString1 e 20(foram removidos os 2 espaços à direita) para cString2.

 

É isso aí, finalizamos aqui mais um post no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br, até um próximo post, grande abraço e fica com Deus.

Link(s) de referência(s):

 
Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.

2 Comentários



  1. I have not checked in here for a while since I thought it was getting boring, but the last few posts are great quality so I guess I’ll add you back to my daily bloglist. You deserve it my friend 🙂

Comentários encerrados.