Главная страница
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.035 c
1-19595
StarCon
2003-03-28 14:49
2003.04.07
Указатели, структуры и DLL


14-19849
Vlad Oshin
2003-03-20 11:45
2003.04.07
причины зависания службы MSGSRV32?


6-19728
fagot
2003-02-14 15:14
2003.04.07
Как декодировать subject письма


1-19621
Asdn
2003-03-24 04:25
2003.04.07
Глюк при заполнении шаблона Word через Ole


1-19601
-= Demon =-
2003-03-28 14:37
2003.04.07
Components[i] as .....