Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как копировать файлы с именами в UNICODE? [D7]


Num8er ©   (2007-03-23 15:21:00) 

Привет всем!!!
Есть такая процедура:

//---Процедура копирования файла
procedure TfrmHC.CopyFileFromTo(FileFrom, FileTo: String);
var
fromFile, toFile: TFileStream;
begin
fromFile:=TFileStream.Create(FileFrom, fmOpenRead);
try
toFile:=TFileStream.Create(FileTo, fmCreate);
try
 toFile.CopyFrom(fromFile, fromFile.Size);
 FileSetDate(toFile.Handle, FileGetDate(fromFile.Handle));
 FileSetAttr(FileTo, faHidden);
finally
 toFile.Free;
end;
finally
fromFile.Free;
end;
end;

//---

Я ее использую в своей программе. Но она не может копировать файлы с именами в UNICODE. Я пробовал много функций. Но никак не смог справится с проблемой. Где моя ошибка?


Правильный Вася   (2007-03-23 15:59:00) [1]

> FileFrom, FileTo: WideString


Рамиль   (2007-03-23 15:33:00) [2]

А зачем CopyFile не угодил


MBo   (2007-03-23 15:25:00) [3]

CopyFile(Ex)W
ShFileOperation


Наверх

Титульная страница Поиск, карта сайта Написать письмо