[Wbarrantes]

En cuanto a tu problema, es posible que esté a la hora de definir tipos de datos. Fíjate con no están ftWideString, ftLargeInt,...
He añadido esto al else:

Pues efectivamente no tengo contemplado el ftWideString, como podria agregarlo?