Главная страница
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.013 c
3-19495
studentas
2003-03-14 17:19
2003.04.07
SQL v DELPHI


3-19500
X-Man
2003-03-19 22:29
2003.04.07
Запись exists???


14-19757
petr_v_a
2003-03-22 17:33
2003.04.07
MSSQL 7 Все ли я правильно понял?


4-19934
Yttrium
2003-02-06 01:38
2003.04.07
Перетаскиваю из экзешника форму(модальный диалог) в дэлэлэ.


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