Cita:
Empezado por sonymix
bueno si este puede funcionar pero mi funcion se declaro asi
Form1: TForm1;
function extenso (valor: real): string;
implementation
asi que tengo un problema de compatibilidad de type y trate de poner lo asi
edit2.text:=extenso(floattotext(edit1.text)); no me resulto
|
Perdón por la demora.
El problema de tipos te lo dá el manejo que haces del parámetro en la llamada a función.
La función
extenso espera un
número real como parámetro y vos le estás enviando un
string al usar
FloatToText.
Si la función está así declarada, lo correcto sería usarla así:
Código Delphi
[-]
Edit2.Text:= extenso(StrToFloat(Edit1.Text));
Tal como puso en su código el amigo Jac.
Saludos.