Что не так?

[zumm]

Доброго всем! Юзаю IdFTP и получаю постоянную ошибку об истечении времени...

procedure SendFile;
var
  ftp: TIdFTP;
  ms:  TMemoryStream;
begin
  ftp:=TIdFTP.Create(Application);
  ms:=TMemoryStream.Create;
  try
    try
      ftp.Host:='ftp.narod.ru';
      ftp.Port:=21;
      ftp.Username:='Логин';
      ftp.Password:='Пасс';
      ftp.Connect;
      AssErt(ftp.Connected);
      ftp.ChangeDir('/');
      ftp.Put('c:\test.txt','test.txt',false);
      ShowMessage('+');
    finally
      ms.Free;
      ftp.Free;
    end;
  except
    ShowMessage('-');
  end;
end;

У меня делфи 2009...помогите..

PS
На сервере появляется пустой файл с нужным именем...

[zumm]

Мде...как всегда не кто не знает..

[Пепел Феникса]

таймаут какой?
инди какая?

ЗЫ: может просто мало кто с инди работает?

Виталий: я вообще почти не юзаю Делфи, какое ИнДи?
просто помню многое из работы с ним.

[Stilet]

просто мало кто с инди работает?

Оффтоп: В отношении меня так оно и есть. Остальные наверное тоже редко используют ее на полную катушку.

[zumm]

файл тестовый, всего 1 кб, таймаут порядка 3 сек, скорость инета приличная. Инди та которая с рад сдудией 2009 идет, вроде 10...