Скачать: CL | DM;

Копирование файлов+ProgressBar   Найти похожие ветки 

← →
chak ©   (2002-11-22 12:29) [0]

Собственно, как можно отобразить ход копирования файла в ProgressBar-е.

---

← →
Opuhshii ©   (2002-11-22 12:30) [1]

CopyFileEx

---

← →
iNew ©   (2002-11-22 12:57) [2]

BlockRead

---

← →
chak ©   (2002-11-22 13:02) [3]

А можно примерчик небольшой?

---

← →
Song ©   (2002-11-22 13:12) [4]

ShFileOperation()

---

← →
iNew ©   (2002-11-22 13:19) [5]

По BlockRead в хелпе есть пример.

---

← →
asmith   (2002-11-22 13:34) [6]

Пусть, например, имена файлов содержатся в списке lstFiles, а pb - ProgressBar, пишем:
with pb do
begin
Step := 1;
Min := 0;
Max := lstFiles.Count - 1;
for iIndex = 0 to lstFiles.Count - 1 do
begin
CopyFile(PChar(lstFiles[iIndex]), "c:\target_dir\new_name.ext");
StepIt();
Update();
end;
end;

---

← →
_Nicola_   (2002-11-22 13:54) [7]

Если не хочется работать головой - есть в RxLibrary функция CopyFile.
Unit FileUtil
Declaration
procedure CopyFile(const FileName, DestName: string; ProgressControl: TControl);
Description
Функция предназначена для копирования файла FileName в файл с именем DestName. Если параметр ProgressControl содержит значение, отличное от nil, то элемент управления, заданный этим параметром, (например, TGauge в 16-битной версии или TProgressBar в Win32) будет отображать процесс копирования файла.

Example
CopyFile("c:\work\unit1.pas", "d:\test\unit1.pas", Gauge);

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c