HOLA!!!
Seguramente es de distraido, pero no me permite compilar por que... bueno lo que dice el titulo... debe ser por despistado, pero lei 4 veces el codigo y no encuentro el problema... les dejo el codigo a ver si saben por que ;).
Mod: Solucionado
GRACIAS POR LEER!!!
Es porque estás definiendo una función dentro de otra función... Aunque utilices la llamada overload necesitas declarar el código de cada función.
PD: WideString y Pos en Delphi 7 no se llevan bien. Para usar Unicode en Delphi´s viejos hay unos componentes llamandos Tnt que traen funciones para trabajar con WideString: WidePos, WideTrim y cosas así...
Saludos.