FTP. Ошибка Access denied

[Остап Бендер]

Доброго времени суток.
Работаю в RAD Studio XE5. Там есть возможность разработки приложений под Android на Delphi.
Пишу FTP-сервер. Есть IdFTPServer и Button.
Пишу следующее:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Server.DefaultPort := 21;
  Server.DefaultDataPort := 21;
  Server.Active := true;
end;

Вылетает ошибка:

First chance exception at $546D6023. Exception class EIdSocketError with message
'Socket Error # 13
Access denied.'.
Process Project1.apk (25778)

Подскажите, пожалуйста, как бороться. Спасибо.

ЗЫ.

<uses-permission android:name="android.permission.INTERNET" />

в манифесте есть.