[viverosjosem]

Hola nuevamente.
Escribi este pequeno programa que hace uso de las librerias Indy, para conectarse a un servidor FTP.
funciona perfectamente si lo compilo y ejecuto para una plataforma windows. Pero cuando lo compilo para android, al ejecutarlo no permite conectarse al servidor.

Si voy al host en internet el archivo esta ahi. subido sin problema. Pero desde android, no se conecta.

Alguna idea de porque no funciona en ANDROID?

Saludos.
Gracias.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
   SubirArchivo( 'C:\Meson.TXT' );
end;

procedure  TForm1.SubirArchivo( sArchivo: String );
var
   FTP: TIdFTP;

begin
   FTP := TIdFTP.Create( nil );
   FTP.Host     := '190.1.....';  //Aqui el Host original 
   FTP.Username := 'xxxxx';       // Usuario
   FTP.Password := 'xxxxx';       // pasword

   try
     FTP.Connect;
     Label1.Caption := 'Estado: Conectado';

     FTP.ChangeDir( '/public_html' );
     FTP.Put( sArchivo, ExtractFileName( sArchivo ), False );
     FTP.Disconnect;
     FTP.Free;
     Label2.Caption := 'Archivo: Cargado exitosamente';

   except raise
      Exception.Create( 'No se ha podido conectar con el servidor ' + FTP.Host );

   end;
end;