Buenos días Ecfisa,
Ya está resuelto, lo que hice fue copiar el contenido del edit en una variable aparte a la cual le quité el punto con la el procedimiento Delete y la función POS que me mostraste, modificándolas un poco y posteriormente con el resultado obtenido se lo pude pasar a la función de monto escrito a través de StrToFloat. El monto ingresado por el usuario no lo toqué de forma que permaneciera siempre con su punto y pasara tal cual al formulario del qreport y eso fue todo:
Delete(Cifra,Pos('.',Cifra),1);
MontoEscrito(StrToFloat(Cifra));
Gracias por la ayuda y por el tiempo tomado
Saludos
__________________
Oskar
|