Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 2 Próxima »

Função: StrTran

Pesquisa e substitui caracteres de uma string ou campo memo.

StrTran ( < cString>, < cSearch>, [ cReplace], [ nStart], [ nCount] ) --> cRet

 

NomeTipoDescriçãoObrigatórioReferência
cStringCaracterIndica a sequência de caracteres ou campo memo que será pesquisada.X 
cSearchCaracterIndica a sequência de caracteres que será procurada na string (cString).X 
cReplaceCaracterIndica a sequência de caracteres que deve substituir a string cSearch. Caso não seja especificado, as ocorrências de cSearch em cString serão substituídas por uma string vazia ("").  
nStartNumérico(**) Indica o número sequencial da primeira ocorrência, de cSearch em cString, que será substituída por cReplace. Caso não seja especificado, o valor padrão será 1 (um). No entanto, se for especificado um número menor que 1 (um), a função retornará uma string vazia ("").  
nCountNuméricoIndica o número máximo de trocas que deve ser realizada pela função. Caso não seja especificado, o padrão é substituir todas as ocorrências encontradas.  

 

cRet
    (caracter)
  • Retorna uma nova string, onde as ocorrências especificadas de cSearch encontradas em cString foram substituídas por cReplace.
  • Essa função é case sensitive; ou seja, faz diferença entre letras maiúsculas é minúsculas.
  • (**) O 4º Parâmetro ( nStart ) foi mantido por compatibilidade, e independente do valor especificado, a função ignora o parâmetro e sempre considera o valor 1 ( default ). 

 

Exemplo
cString  := "Texto para StrTran Texto para StrTran Texto para StrTran" 
cSearch  := "StrTran"
cReplace := "***Substitui***"
nStart   := 1 // Compatibilidade
nCount   := 2 // Substitui as duas primeiras strings
cString2 := StrTran(cString, cSearch, cReplace, nStart, nCount)
 
MsgAlert(cString + chr(13) + cString2)

Abrangência

  • Advanced Protheus 6.09
  • Advanced Protheus 7.10
  • Microsiga Protheus 8.11
  • Protheus 10

 

 

 

  • Sem rótulos