Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.07;
Скачать: CL | DM;

Вниз

Как показать прогресс копирования или скачки файла   Найти похожие ветки 

 
Andrey Terekhov   (2003-03-26 14:25) [0]

Люди помогите!
Как показать прогресс копирование или скачки файла, т.е. его текущий размер, что-то вроде скопировано столько-то байт из ...
Есть ли возможность вызвать стандартный диалог?

Спасибо


 
Jel ©   (2003-03-26 15:09) [1]


Uses ..., ShellAPI;

procedure TForm1.Button1Click(Sender: TObject);
var struct : TSHFileOpStruct;
begin
ZeroMemory(@struct, sizeOf(Struct));
with struct do begin
Wnd := 0;
wFunc := FO_COPY;
pFrom := "c:\data\*.*"+#0;
pTo := "d:\data"+#0;
fFlags := FOF_NOCONFIRMATION or FOF_NOCONFIRMMKDIR;
end;
SHFileOperation(struct);
end;



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

Текущий архив: 2003.04.07;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.017 c
1-19532
Nekto
2003-03-26 14:42
2003.04.07
Export from Word/Excel


1-19605
pavel_k
2003-03-28 19:11
2003.04.07
Цвет пикселя на состовляющие


3-19474
Сергей Шапранов
2003-03-19 14:08
2003.04.07
Работа Paradox в сети


4-19930
Sfagnum
2003-02-10 10:43
2003.04.07
Надпись на Desktop e


14-19855
Merlin
2003-03-20 12:41
2003.04.07
Геометрия, блин