É necessário estar declarado SysUtils na seção uses,
em versões unicode declare System.SysUtils.
Função do Delphi
Nome: UpperCase(texto);
Retorno: String
Exemplos de uso:
1 2 3 4 5 6 7 8 9 10 11 | procedure TForm1.Button1Click(Sender: TObject); begin { Exemplo 1 } ShowMessage(UpperCase('Teste')); { Exemplo 2 } ShowMessage(UpperCase('show delphi')); { Exemplo 3 } ShowMessage(UpperCase('rAD sTUDIO xE 7')); end; |
