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

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

Ветеран


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

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


Как в исдоне сделать дергающийся прогресс бар? знаю что нужно указать где то здесь

procedure ShowComponents;
var PBTop:integer;
begin
PBTop:=ScaleY(50);
ISDoneProgressBar1 := TNewProgressBar.Create(WizardForm);
with ISDoneProgressBar1 do begin
Parent := WizardForm.InstallingPage;
Height := WizardForm.ProgressGauge.Height;
Left := ScaleX(0);
Top := PBTop;
Width := ScaleX(365);
Max := 1000;
end;

Последний раз редактировалось insombia, 28-09-2011 в 18:00.


Отправлено: 17:42, 28-09-2011 | #3234