Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Cambiar numeros a cantidad con letra (https://www.clubdelphi.com/foros/showthread.php?t=56596)

jhonny 02-12-2008 23:33:47

Cita:

Empezado por elchino07 (Mensaje 329293)
El resultado me sale en letras minusculas, hay alguna manera de que el resultado se muestre en mayusculas o algo que yo haya omitido?

Antepones la función AnsiUpperCase de la unidad SysUtils y listo ;).

enecumene 02-12-2008 23:34:24

Cita:

Empezado por elchino07 (Mensaje 329293)
El resultado me sale en letras minusculas, hay alguna manera de que el resultado se muestre en mayusculas o algo que yo haya omitido?

Si quieres que las letras sean en mayúsculas, sólo debes usar la función Uppercase:

Código Delphi [-]
Edit2.Text := Format('%s CON %d/100 .-', [Uppercase(Letras1.AsString), Trunc(100*Frac(Numero))]);

Saludos.

ContraVeneno 03-12-2008 00:22:01

AnsiUpperCase amigo enecumene, AnsiUpperCase

enecumene 03-12-2008 00:25:31

Cita:

Empezado por ContraVeneno (Mensaje 329303)
AnsiUpperCase amigo enecumene, AnsiUpperCase

¡Hostia!, tienes razón Contra, Gracias :D

Saludos.


La franja horaria es GMT +2. Ahora son las 16:24:36.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi