como comvertin numeros a letras

[pollo_c]

hola amigos, si pude terminar mi programa, disculpen por no agradecerles a tiempo, pero quiero agradecer al club y a todos los que me ayudaron,
muchas gracias a:

caral
neftali
egostar
gus_ggo

sin mas por el momento garcias

[TrUnkS]

Si queremos pasar directamente las palabras generadas a mayúsculas utilizando Atexto y pegarlo en un Edit o Memo hacemos:

Código Delphi [-]
 Memo1.Clear;
 Letras1.Numero := StrToFloat(FormatFloat('####',StrToFloat(Label1.Caption)));
Memo1.Text := UpperCase(Letras1.AsString)

Lo que hace FormatFloat('####',StrToFloat(Label1.Caption)) es convertir un flotante a entero. Me explico:
El número 2345,56 es equivalente a 2346 en entero, por lo tanto la cifra que va a convertir a palabras no será 2345,56 sino 2346. Saludos