Как указать период, в течение которого метка оставшегося времени обновляется в Inno Setup?

Question

Я хотел показать оставшееся время во время установки, как в следующем вопросе и использовал код оттуда, отправленный TLama: How to show percent done, elapsed time and estimated time progress?

код работает для меня, так что спасибо за это. Но если вы устанавливаете большие файлы, период, в котором обновляется «оставшееся время метки», выполняется слишком быстро.

Так что я хотел спросить, как изменить период обновления «метки оставшегося времени», чтобы он обновлялся только каждую секунду или каждую половину секунды.

Заранее спасибо

Answer 1

Использование GetTickCount помнить время последнего обновления. На следующих вызовах CurInstallProgressChanged разницы рассчитайте в CurTick и обновить метки, только если разница достаточно велика (1000 = 1 секунда)

var 
    LastUpdate: DWORD; 

procedure CurInstallProgressChanged(CurProgress, MaxProgress: Integer); 
var 
    CurTick: DWORD; 
begin 
    CurTick := GetTickCount; 
    if (CurTick - LastUpdate) >= 1000 then 
    begin 
    LastUpdate := CurTick; 
    // Update labels 
    end; 
end;