Numeros a Letras!!

[jmedina]

Empezado por roman

En la propiedad Numero pones la cantidad que desees, por ejemplo:

Letras1.Numero := 1425.3;

Para obtener el número escrito en letras usas la propiedad AsString:

Edit1.Text := Letras1.AsString;

Con lo que obtendrás:

"mil cuatrocientos veinticinco con treinta"

Las propiedades Moneda y Centavos te sirven para indicar cómo quieres nombrar las unidades y los decimales. Por ejemplo, si pones

Letras1.Monedas := 'euros';
Letras1.Monedas.Centavos := 'centavos';

la propiedad AsString te dará:

"mil cuatrocientos veinticinco euros con treinta centavos"

La propiedad Masculino es para indicar su quieres que el texto esté en género masculino o femenino. Así, si pones

Letras1.Moneda := 'mujeres';
Letras1.Centavos := 'niñas';
Letras1.Numero := 3.04;
Letras1.Masculino := false;

La propiedad AsString te dará:

"tres mujeres con cuatro niñas"

Finalmente, la propiedad Separador me parece que es para indicar el separador decimal (punto, coma o el que uses).

// Saludos

Ok en este caso si le entiendo, pero por ejemplo esto lo puedo aplicar en el evento onclick de algun boton que yo inerte, o algo parecido, es decir no se si me puedan decir como es que ejecuto este codigo, por ejemplo se me ocurre que cuando salga de una caja de texto, en la cual contiene la cantidad a convertir ahi puedo hacer la conversion, o bien como la realizaria

Saludos
Y disculpen la lata es que soy un poco novato en esto
Jmedina