Programação

Como Deixar a Primeira Letra Maiúscula de uma String – Delphi

Curta Nossa Página

Deixando a Primeira Letra Maiúscula de uma String com Delphi

Função para deixar somente a primeira letra da primeira palavra em maiúscula

function SoPrimeiraLetraMaiuscula(p_texto: string): string;
begin
if p_texto <> '' then
result := UpperCase(Copy(p_texto,1,1))+LowerCase(Copy(p_texto,2,Length(p_texto)));
end; 

Exemplos:

  1. BRASIL = Brasil
  2. São Paulo = São paulo
  3. Ano Novo = Ano novo

 

Etiquetas
Botão Voltar ao topo
Fechar