Valor en letras, en mayuscula

[[Delphius]]

Este es un ejemplo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := AnsiUpperCase('texto en minusculas');
end;

No tienes que implementar la función.. sólo debes invocarla.

Para tu caso debes hacer:

Código Delphi [-]
pplabel8.Caption := AnsiUpperCase(letras1.AsString);

Saludos,

EDITO: corregí el error que amablemente me hizo saber jhonny