Como substituir caracteres dentro de uma string?

O Delphi dispõe de muitas funções que agilizam o nosso trabalho.
Nesta dica vamos dar destaque a uma função utilizada para
substituir textos. Ela conta com várias opções e seu uso é
muito fácil.

É necessário estar declarado SysUtils na seção uses,
em versões unicode declare System.SysUtils.

Função do Delphi:
StringReplace(texto, texto velho, texto novo, opções);

Exemplos de uso:

1
2
3
4
5
6
7
8
9
10
11

procedure TForm1.Button1Click(Sender: TObject);
begin
  // Substitui todos caracteres de mesma caixa
  ShowMessage(StringReplace('abAcate', 'a', '@', [rfReplaceAll]));
 
  // Substitui todos caracteres ignorando a caixa
  ShowMessage(StringReplace('abAcate', 'a', '@', [rfIgnoreCase, rfReplaceAll]));
 
  // Substitui o primeiro caracter de mesma caixa
  ShowMessage(StringReplace('abAcate', 'a', '@', []));
end;