ADD: Pausing WCX plugins operations

This commit is contained in:
Alexander Koblov 2011-06-28 20:18:47 +00:00
commit ed66ed4d85
4 changed files with 9 additions and 4 deletions

View file

@ -116,7 +116,7 @@ end;
function ProcessDataProc(WcxCopyInOperation: TWcxArchiveCopyInOperation;
FileName: UTF8String; Size: LongInt): LongInt;
begin
//DCDebug('Working ' + FileName + ' Size = ' + IntToStr(Size));
//DCDebug('Working (' + IntToStr(GetCurrentThreadId) + ') ' + FileName + ' Size = ' + IntToStr(Size));
Result := 1;
@ -127,6 +127,8 @@ begin
with WcxCopyInOperation.FStatistics do
begin
CurrentFileFrom:= FileName;
if Size >= 0 then
begin
CurrentFileDoneBytes := CurrentFileDoneBytes + Size;
@ -154,8 +156,8 @@ begin
end;
end;
CurrentFileFrom:= FileName;
WcxCopyInOperation.UpdateStatistics(WcxCopyInOperation.FStatistics);
WcxCopyInOperation.CheckOperationState;
end;
end;
end;

View file

@ -144,7 +144,7 @@ end;
function ProcessDataProc(WcxCopyOutOperation: TWcxArchiveCopyOutOperation;
FileName: UTF8String; Size: LongInt): LongInt;
begin
//DCDebug('Working ' + FileName + ' Size = ' + IntToStr(Size));
//DCDebug('Working (' + IntToStr(GetCurrentThreadId) + ') ' + FileName + ' Size = ' + IntToStr(Size));
Result := 1;
@ -183,6 +183,7 @@ begin
end;
WcxCopyOutOperation.UpdateStatistics(WcxCopyOutOperation.FStatistics);
WcxCopyOutOperation.CheckOperationState;
end;
end;
end;

View file

@ -139,6 +139,7 @@ begin
end;
WcxDeleteOperation.UpdateStatistics(WcxDeleteOperation.FStatistics);
WcxDeleteOperation.CheckOperationState;
end;
end;
end;

View file

@ -101,7 +101,7 @@ end;
function ProcessDataProc(WcxTestArchiveOperation: TWcxArchiveTestArchiveOperation;
FileName: UTF8String; Size: LongInt): LongInt;
begin
//DCDebug('Working ' + FileName + ' Size = ' + IntToStr(Size));
//DCDebug('Working (' + IntToStr(GetCurrentThreadId) + ') ' + FileName + ' Size = ' + IntToStr(Size));
Result := 1;
@ -140,6 +140,7 @@ begin
end;
WcxTestArchiveOperation.UpdateStatistics(WcxTestArchiveOperation.FStatistics);
WcxTestArchiveOperation.CheckOperationState;
end;
end;
end;