Окно копирования

← →
Пономарев Андрей (2003-02-10 12:35) [0]

Уважаемые Мастера,
подскажите пожалуйста, есть ли какие-то функции API, с помощью которых можно показать стандартное окошечко копирования Windows. (с летящими бумажками)

Заранее благодарен,
Андрей

← →
gsu © (2003-02-10 12:48) [1]

Вроде, в TAnimate было

← →
Anatoly Podgoretsky © (2003-02-10 12:55) [2]

SHFileOperations c соответствующими флагами

← →
O6OPMOT (2003-02-10 13:45) [3]

procedure FileOperation (const source, dest: string;
op, flags: Integer);
var shf: TSHFileOpStruct;
s1, s2: string;
begin
FillChar (shf, SizeOf (shf), #0);
s1:= source + #0#0;
s2:= dest + #0#0;
shf.Wnd:= 0;
shf.wFunc:= op;
shf.pFrom:= PCHAR (s1);
shf.pTo:= PCHAR (s2);
shf.fFlags:= flags;
SHFileOperation (shf);
end;

в программе:
FileOperation (from, to, FO_COPY,FOF_ALLOWUNDO + FOF_NOCONFIRMATION);

> O6OPMOT (10.02.03 13:45)

TSHFileOpStruct в каком Unut-e?

Uses ????; for TSHFileOpStruct.

thks.

ShellAPI

Окно копирования Найти похожие ветки