Descarga archivo TIBFTP
 

Hola, no se si esta bien clasificada esta consulta aqui... pero aqui va.

Necesito descargar un archivo desde un servidor FTP, utilizo el componente TIDFtp. El asunto es que si corro la aplicacion en Windows Vista no dsecarga el archivo, en cambio en Windows XP, si que funciona.

El código:

Código Delphi [-]
idftp1.passive:=true;
try
idftp1.Connect;
if idftp1.Connected = true then
begin
dir := GetEnvironmentVariable('Programfiles')+'\Soft';
idftp1.Get(ExtractFileName('ver.ini'),GetEnvironmentVariable('Programfiles')+'\TamaSoft\ver.ini', TRUE, False );
end;

Alguna idea de porque ocurre esto??

Gracias

Tal vez sea tema de permisos.
Creo qrecordar que Vista tiene restricciones en cuanto a guardar ficheros en el direectorio de "Archivos de programa" o "Program Files".
¿Puedes hacer la prueba de intentar guardarlo en otro directorio? (sólo para descartar ese tema).

Si tu programa lo ejecutas como administrador (Botón derecho sobre tu ejecutable y le das a ejecutar como administrador) debería de funcionar correctamente, si no vas a tener que usar otra carpeta.

Saludos.