Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для Johny777

Ветеран


Сообщения: 649
Благодарности: 444

Профиль | Отправить PM | Цитировать


использую отображение процентов в установке
вот так
читать дальше »
Код: Выделить весь код
[Files]
Source: Files\*; DestDir: {app}; AfterInstall: ExtLog();

[  code]
var
ProgressLabel: TLabel;

procedure ExtLog();
begin
  with WizardForm.ProgressGauge do begin
    ProgressLabel.Caption:=IntToStr((Position-Min)/((Max - Min)/100)) + '%'
    if (Position-Min)/((Max - Min)/100) > 50 then ProgressLabel.Font.Color:= clWhite
  end
end;

procedure InitializeWizard;
begin
    ProgressLabel:=TLabel.Create(WizardForm)
    ProgressLabel.Top:= 10;
    ProgressLabel.Left:= 270;
    ProgressLabel.Caption:= '0%';
    ProgressLabel.AutoSize:= True;
    ProgressLabel.Font.Color:= cl3DdkShadow;
    ProgressLabel.Font.Style:= [fsBold];
    ProgressLabel.Transparent:= True;
    ProgressLabel.Parent:= WizardForm.ProgressGauge;
end;

проблема в том, что лейбл обновляется после копирования файла и если он большой, то рывками например с 50% до 60%
Есть вроде возможность считывать положение прогресбара
может у кого есть пример (там кажется задействована InnoCallBack.dll) для отображения таких процентов?
оно будет точнее

Отправлено: 16:43, 01-04-2012 | #1360