Cita:
Empezado por movorack
¿Leíste lo del enlace?
El error es generado en la función Copy. Ya que la función requiere un texto con el que trabajar
Al hacer el cast
A la función le estás pasando es un objeto no el texto del objeto lo que obtendrías con
Código Delphi [-]
(Sender as TrDBEdit).text
Recomendación:
Ya que al parecer estás usando un control de base de datos, podrías validar el valor almacenado en el campo en lugar al del control.
Código Delphi [-]
QueryFieldavalidar.AsString
|
Si esa parte la entendí pero mi problema no es como tal el pasarle el objeto sea de un campo de base de datos o de un edit. El problema es que al invocar el procedimiento desde el evento keypress de un Edit al ingresar un punto no lo muestra y no realiza correctamente la validación del procedimiento que es modificar ese punto cambiarlo por una coma y visualizarlo en el edit con sus respectivos decimales.
Es que lo que tengo en el procedure funciona correctamente si es invocado directamente desde el keypress del edit, me explico sin invocar un procedimiento externo sino aplicar todo el código ahi, pero como lo necesito para varios edits por eso decidí volverlo un procedure pero al hacer esto como te comento no me realiza correctamente la validación.