Una vez que tengas la linea que quieres en un string, para sacar el numero de telefono podrias usar la siguiente funcion
numerotlf:=copy(lineaguardada,40,9);
40 porque dices que empieza en la 40 el numero y 9 porque su longitud (del numero) es de 9 caracteres.
Saludos.
__________________
El que pregunta es tonto durante 5 minutos, el que no pregunta es tonto para toda su vida.
|