Скачать: CL | DM;

TSHfileopstruct   Найти похожие ветки 

← →
Skif   (2003-07-15 12:32) [0]

Доброе время суток.
Как использую данную функцию переименовать группу файлов. Т.е. имеются следующие файлы "файл.аа1", "файл.аа2" и т.д. в "файл.бб1", "файл.бб2". Заранее благодарен. Просьба цикл не предлогать.

---

← →
Orion2 ©   (2003-07-15 12:44) [1]

Не уверен точно, но попробуй указать:
источник: файл.аа1#0файл.аа2#0#0
приемник: файл.бб1#0файл.бб2#0#0

#0 - нулевой символ

---

← →
Prov ©   (2003-07-15 12:51) [2]

> Не уверен точно, но попробуй указать:
> источник: файл.аа1#0файл.аа2#0#0
> приемник: файл.бб1#0файл.бб2#0#0
>
> #0 - нулевой символ


Не получиться так, только что попробовал Ж))

uses ShellApi;
procedure TForm1.Button1Click(Sender: TObject);
var FOS: TSHFileOpStruct;
begin
FillChar(FOS, SizeOf(FOS), 0);
with FOS do
begin
FOS.Wnd:= Handle;
FOS.wFunc:= FO_RENAME;
FOS.pFrom:= "C:\aaa.aaa";
FOS.pTo:= "C:\ccc.ddd";
FOS.fFlags:= FOF_SILENT or FOF_NOCONFIRMATION;
( FOS)

> Не уверен точно, но попробуй указать:
> источник: файл.аа1#0файл.аа2#0#0
> приемник: файл.бб1#0файл.бб2#0#0
>
> #0 - нулевой символ


Не получиться так, только что попробовал Ж))

uses ShellApi;
procedure TForm1.Button1Click(Sender: TObject);
var FOS: TSHFileOpStruct;
begin
FillChar(FOS, SizeOf(FOS), 0);
with FOS do
begin
FOS.Wnd:= Handle;
FOS.wFunc:= FO_RENAME;
FOS.pFrom:= "C:\aaa.aaa";
FOS.pTo:= "C:\ccc.ddd";
FOS.fFlags:= FOF_SILENT or FOF_NOCONFIRMATION;
FOS.hNameMappings:= nil;
end;
SHFileOperation(FOS);
end;

---

← →
Skif   (2003-07-15 13:06) [3]

Вы не поняли. Файлы имею одно имя, расширение отличается только. И мне нужно не один файл а НЕСКОЛЬКО

---

← →
Orion2 ©   (2003-07-15 13:12) [4]

> Skif
Ты проюовал, что я написал? Я сам не пробоавал :)), но 70%, что это будет работать.

---

← →
Orion2 ©   (2003-07-15 13:12) [5]

> Skif
Ты пробовал, что я написал? Я сам не пробоавал :)), но 70%, что это будет работать.

---

← →
Skif   (2003-07-15 13:17) [6]

ДА. В нелпах писано, что можно группу, а на практике нет. У кого какие соображения?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c