Quote:
Originally Posted by Masquerade
Code:
function ProgressCallback(OveralPct, CurrentPct: Integer; CurrentFile, TimeStr1, TimeStr2, TimeStr3: PAnsiChar): LongWord;
var
CurTick: DWORD;
begin
Memo.Lines.Add('Unpacking: ' + CurrentFile);
I thought maybe I could make a temporary string variable and comparing it with the current file and if so, skip echoing the current file, I am interested if anyone has any thoughts on this. |
Another option is to use it this way.
I don't know if the filenames are partially cut off or not.
Let's say you have 2 files with same names in somewhat similar paths then the second file will also be displayed.
Example:
1)
Data1.bin destination {app}\
bin
FileName =
Bin32\File1.txt
FileName =
Bin32\File2.txt
2)
Data2.bin destination {app}\
FileName =
Bin\
Bin32\File1.txt
FileName =
Bin\File3.txt
In this case there are similar names as long as it is not the same name as the previous line, it will be added.
Code:
if (Memo.Lines.Count = 0) or (CompareText(Memo.Lines.Strings[Memo.Lines.Count - 1], 'Unpacking: ' + CurrentFile) <> 0) then
Memo.Lines.Add('Unpacking: ' + CurrentFile);