[Norw]

Надо из своей программы переместить word документ из одной папки в другую.... помогие плz

[Drozh]

Как вариант функция для работы с файлами из модуля ShellApi

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

<b>uses</b>  ShellApi;   <b>var</b>  ipFileOp: TSHFileOpStruct; // перед тем как испоьзовать необходимо заполнить данную структуру <b>begin</b>  FillChar(ipFileOp, SizeOf(ipFileOp), 0); // удаляем ненужные данные    ipFileOp.Wnd := Handle; // окно к которому пренадлежит процесс  ipFileOp.wFunc := FO_MOVE; // операция (можно копировать, удалять, переименовавать...)  ipFileOp.pFrom := 'C:\1.txt'; // имя фала  ipFileOp.pTo := 'D:\2.txt'; // новое имя фала  ipFileOp.fFlags := FOF_NOCONFIRMMKDIR; // флаги (точно не помню,вроде этот)  ipFileOp.fAnyOperationsAborted := Flase; // прекращение операции  ipFileOp.hNameMappings := nil; // карта  ipFileOp.lpszProgressTitle := ''; // заголовок    SHFileOperation(ipFileOp); // сама функция

[albatros]

ну намудрил
проще
CopyFile копировать
DeleteFile удалять

[Drozh]

То ShellApi, а это WinApi

[Norw]

Ага, пасибо большое