Nesse vídeo demonstraremos a utilização da função Lower, que serve para deixar uma string, com todos os caracteres minúsculos.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "Totvs.ch"
/*/{Protheus.doc} User Function zExe335
Transforma uma string, deixando todos os caracteres minusculos
@type Function
@author Atilio
@since 12/03/2023
@see https://tdn.totvs.com/display/tec/Lower
@obs
Função Lower
Parâmetros
+ cText , Caractere , Texto que será deixado em minúsculo
Retorno
+ cTextNew , Caractere , Texto já formatado tudo em minúsculo
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe335()
Local aArea := FWGetArea()
Local cMsgOri := "Terminal de Informação"
Local cMsgMin := Lower(cMsgOri)
//Exibe a string original e a formatada
FWAlertInfo("Original: " + cMsgOri + CRLF + "Minusculo: " + cMsgMin, "Teste - Lower")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.