Hola
1-Pones el componente en el form
2-Pones esta funcion:
Código Delphi
[-]
function Deletrear(numero: real) : string; var
letras: TLetras;
begin
letras := TLetras.Create(nil);
try
letras.Numero := numero;
Result := letras.AsString;
finally
letras.Free;
end;
end;
3-llamas a esa función, por ejemplo:
Código Delphi
[-]
procedure TForm1.Edit2DblClick(Sender: TObject);
var
n: String;
begin
n:= Deletrear(StrToFloat(Edit2.Text) );
Edit6.Text:= (n);
end;
Esta función y ejemplo son gracias a Dec.
Saludos