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

[alcides]

Gracias Jhonny por todo
Gracias Delphius por tus recomendaciónes


Gracias mil, todo perfecto


Alcides
Rep.Dom.

[jhonny]

Que bueno que todo vaya bien, pero me quedo una duda...
Tengo claro que es AnsiUpperCase pero... ¿que se supone que hace AnisUpperCase? lo pregunto por:

Empezado por Delphius

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

[[Delphius]]

Empezado por jhonny

Tengo claro que es AnsiUpperCase pero... ¿que se supone que hace AnisUpperCase?

Es un error de tipeo... no me di cuenta. Estaba escribiendo al vuelo.. y la verdad que por escribir sin comprobar en Delphi se me paso

Ya corrigo mi error. Gracias por hacermelo saber...

Saludos,

[fidel]

Hola jhonny:

Satisfago tu curiosidad.

Más o menos
UpperCase funciona para caracteres ASCII hasta 133 (z minúscula)
AnsiUpperCase para todos, creo.

UpperCase('Bisoñé') ... resultado ... BISOñé

AnsiUpperCase('Bisoñé') ... resultado ... BISOÑÉ

Para el español que tenemos acentos y ñ es importante.

Un saludo.

[jhonny]

Empezado por fidel

Satisfago tu curiosidad.

Muchas gracias fidel

Empezado por Delphius

Es un error de tipeo... no me di cuenta. Estaba escribiendo al vuelo.. y la verdad que por escribir sin comprobar en Delphi se me paso

Ya corrigo mi error. Gracias por hacermelo saber...

Hombre no hay problema

[[egostar]]

Empezado por jhonny

Muchas gracias fidel

Pues si se agradece la aportación.

Vamos que después del cambio de Delphius cualquiera se desconcierta.....

Saludos