Error debuguer con F8.

[ingel]

Buenos dias , les comento algo por si les sirve de ayuda para deducir que podria ser la causa del problema...
Pude hablar con el programador original del sistema, me comento que eso le empezo a pasar EN ALGUN MOMENTO , no sabe si luego de instalar algun componente o que y como que habia x numero de lineas FIJAS que estaba desfazado el debuguer con el codigo (evidentemente nunca logro corregirlo)..
El sabia que eran 7 lineas mas abajo por ejemplo entonces cuando debugueaba , miraba al momento del error 7 lineas abajo para encontrar la linea exacta de copdigo.
En el primer mensaje adjunte un PDF de como se ve lo que pasa. Respecto a enviar el codigo no tengo problema si les parece.. ( para compilar los hará renegar un poco creo y no quisiera abusar de su amabilidad y tiempo , pero está a disposicion )

[Neftali [Germán.Estévez]]

Probar lo de los caracteres "raros" que te he comentado es fácil.
Simplemente debes abrir el fichero .PAS con Notepad++ (por ejemplo) y visualizar todos los caracteres. Ahí deberías ver si hay alguno extraño.

Te puede ayudar lo siguiente. Busca en el código desde el inicio de la unit, cual es el punto en que los puntos empiezan a "desfasar". Ese es el punto donde debes buscar esos caracteres en el Notepad++.

[ingel]

Hola A todos. les cuento , inicie a Debuguear desde la primera instruccion del sistema en el archivo .dpk
llego al pas principal y hasta una funcion que tiene algunas llamadas de un componente FTP , ahi se descontrola. Adjunto imagen en pdf llamado 'clubdelphi.pdf' .
Puse el Break que se ve en rojo , con F8 pasa a la instruccion de debajo , pero con el tercer F8 pasa a una linea sin codigo.
MUCHAS GRACIAS a todos ,que tengan un buen dia.
sds

[Casimiro Noteví]

Poco podemos decir/hacer ya, si no pasas el código.

[[duilioisola]]

Yo haría una prueba comentando el componente.


Algo así:

Código Delphi [-]
losFilesEnFTP := TStringList.Create; 
try 
  // Comentado función de FTP1 y creado mockup con lista de ficheros de prueba
  // FTP1.List(...); 
  losFilesEnFTP.Add('test1.txt'); 
  losFilesEnFTP.Add('test2.txt'); 
  losFilesEnFTP.Add('test3.txt');   
  while ...   
finally 
  losFilesEnFTP.Free; 
end;

Además mira si estos son funciones que devuelve algo o son procedimientos.

• FTP1.Conectar() Quizás devuelva true/false
• FTP1.ChangeDir() Quizás devuelva true/false

Mete cada uno de estos dentro de un try..except.
Podrían estar devolviendo una excepción ABORT que creo que es "silenciosa" y Delphi no la muestra.

Código Delphi [-]
try
  FTP1.Conectar() 
except
  on E:Exception do
    ShowMessage(E.Message);
end;

[ingel]

sds
PD recien el miercoles podre probar lo sugerido por duilioisola. gracias