Delphi - IdFTP проблемы с кирилицей в названиях

[OkSherd]

Доброго времени суток уважаемые формчане.

Столкнулся с проблемой такого характера:

ФТП клиент написан на delphi 2010, через компонент TIdFTP организована передача файла





Код:

Код: Выделить всё

procedure TFFtp.Button2Click(Sender: TObject);
  var
  fn:string;//переменная имени файла
begin
  fn:=ExtractFileName(Edit1.Text);
...
  IdFTP1.Put(Edit1.Text, Edit2.Text + fn ,true);
...
end

Все работает если имя передаваемого файла написано латыницей. С кирилицей в имени выдает ошибку:





Опробовал разные ФТП сервера на Винде и на Линуксе проблема та же. Есть догадки что проблема в кодировке имен файлов. (IdFTP)

Можно ка то обойти эту проблему?

[ferget]

попробуйте строку в ansi перекодировать перед отправкой

[ferget]

ferget Если я не ошибаюсь то Edite и так записана строка в ansi кодировке по умолчанию.

[Drongo]

OkSherd, В свойстве Charset попробуйте установить RUSSIAN_CHARSET

[OkSherd]

Цитата Drongo:



OkSherd, В свойстве Charset попробуйте установить RUSSIAN_CHARSET

Delphi - IdFTP проблемы с кирилицей в названиях

Увы не помогло. Вопрос так и не решился. На фтп серверах, поднятых на Unix системах файлы с кирилицей передаются, но название меняется на набор символов:



На фтп сервера на Windows системах совсем отказываются принимать файл.

[AlexVol]

Цитата OkSherd:



ferget Если я не ошибаюсь то Edite и так записана строка в ansi кодировке по умолчанию.

Delphi - IdFTP проблемы с кирилицей в названиях

Вот тут как раз ошибаетесь: там обычный String. И дело не в кодировке а в формата данных.

Надо использовать строку не из Edit, а через промежуточную переменную явного типа AnsiString.

Автопреобразования строк иногда выдают не очевидные результаты. Особенно в выражениях.