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

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

Как изменить имя каталога [D7, WinXP]

Dron ©   (2004-04-10 16:42:00) 

Подскажите,как мне изменить имя каталога.

---

Yanis   (2004-04-12 18:27:00) [1]

To [1]
:)

---

easy   (2004-04-12 17:52:00) [2]

RenameFile('C:\Temp\5879\','C:\Temp\5879_new\');

---

Евгения   (2004-04-12 17:30:00) [3]

uses ShellAPI;

procedure Rename(AHandle: THandle; AFromDir, AToDir: String);
var
 SHFileOpStruct: TSHFileOpStruct;
begin
 with SHFileOpStruct do
 begin
   Wnd := AHandle;
   wFunc := FO_RENAME;
   pFrom := PChar(AFromDir);
   pTo   := PChar(AToDir);
   fFlags := 0;
   fAnyOperationsAborted := False;
   hNameMappings := nil;
   lpszProgressTitle := nil;
 end;
 ShFileOperation(SHFileOpStruct);
end;

Пример:
Rename(Handle,'C:\tmp\2.txt','C:\tmp\1.txt' );

---

Songoku   (2004-04-10 16:48:00) [4]

Я думаю .... MoveFile
точно не знаю .. не где проверить!

---

Наверх