| nut |
| Отправлено: 22.02.2006, 00:24 |
|
Не зарегистрирован
|
Вот есть такой код
SHFILEOPSTRUCT sh;
sh.hwnd=MainForm->Handle;
sh.wFunc = FO_MOVE;
->RenameFile(ptFileOld + NameFileOld, ptFileOld + NameFileOld + "%1#tempory#2%")
->NameFileOld = NameFileOld + "%1#tempory#2%";
From = ptFileOld + NameFileOld + "\0\0";
To = ptFileNew + NameFileNew + NameFileOld;
sh.pFrom = From.c_str();
sh.pTo = To.c_str();
sh.fFlags = FOF_NOCONFIRMATION | FOF_NOCONFIRMMKDIR | FOF_SILENT;
if (SHFileOperation(&sh) == 0)
{
->NameFileOld = NameFileOld.Delete(NameFileOld.Length() — 12, 13);
->RenameFile(ptFileNew + NameFileNew + NameFileOld + "%1#tempory#2%", ptFileNew + NameFileNew + NameFileOld);
}
else тоже ренаме
так вот если убрать все ренаме то при копирование папки под названием "Компоненты" не копирует хотя до этого нормально копировала
и с удалением пришлось такое же сделать почемуто нехотела удалять папки длиной = 2
builder 2006 может в нем дело? или венда? |
|
| nut |
| Отправлено: 22.02.2006, 00:27 |
|
Не зарегистрирован
|
да кстати код щас рабочий, хотя и раньше он работал пока не встретил эти проблемы, но это маразм переименовываем чтобы удалить |
|
|
