Главная страница
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.041 c
14-19775
DeMoN-777
2003-03-21 16:30
2003.04.07
Cgi


3-19506
OleGKu
2003-03-19 15:48
2003.04.07
MSSQL & Delphi


3-19427
ArtemB
2003-03-18 12:28
2003.04.07
Работа с базами


14-19792
Demon
2003-03-19 16:50
2003.04.07
Многотомные ZIP-архивы


3-19490
АлеКо
2003-03-18 09:10
2003.04.07
Работа с dbf (clipper)