Convertir String en TDate. No me sirve EncodeDate

[VRO]

Vereís siempre que he pasado un String a TDate he utilizado en EncodeDate, pero esta vex no me sirve porque le pase lo que le pase el resultado del encodeDate me sale negativo y cuando lo intento insertar con un Query y la clausula insert into ..... no me da error pero tampoco me lo inserta.

La fecha es de tipo Date en la base de datos, la importo de una Tabla de Access en la cual también es de tipo Date, el problema viene cuano en la tabla de Access no está la fecha y pido al usuario que la inserte, para lo cual utilizo un InputQuery y claro lo que introduzco en el es un String.

Alguien sabe como hacer el cambio de String a Date sin utilizar el encodeDate


Gracias a todos por su ayuda.