Hola...
Greco, el error que tienes es por que la clase TStringList tiene un método llamado GetText el cual no recibe parámetros y al estar tu código dentro de un with..do, Delphi cree que estás tratando de llamar a ese método y no a tu función...
Así que tienes dos opciones, usar lo que te a recomendado Caro o cambiar el nombre de tu función GetText...
Saludos...
|