1. Уважаемые гости и пользователи форума.
    Администрация настоятельно рекомендует не регистрировать несколько аккаунтов для одного пользователя. При выявлении наличия мультиаккаунтов будут заблокированы все учетные записи данного пользователя.
    Аккаунты, зарегистрированные на временную почту будут также заблокированы.

Вопрос Можно ли украсить Прогресс Бар...

Тема в разделе "Inno Setup", создана пользователем EvilAlex, 31 май 2018.

  1. Ветеран

    Регистрация:
    18 авг 2011
    Сообщения:
    205
    Симпатии:
    93
    Всем доброго времени суток!
    Дело было вечером делать было нечего)))
    Возник вопрос, возможно ли на ботве реализовать красивый прогресс бар(в дальнейшем ПБ). Все что я знаю. что можно сделать заполняемый с растяжением картинки и заполнением кусками. А можно ли сделать так чтобы картинка появлялась плавно не растягиваясь и не кусками ?

    Как пример...
    20-Animated-CSS-Progress-Bar-by-Sascha-Michael-Trinkaus.jpg

    В общем в чем задумка. 3 картинки... 1 рамка ПБ, 2 сам БП и 3 картинка огонек. полоска или что-то еще что определяло бы степень прогресса после которой появлялся сам прогресс бар, не растягиваясь, а именно как будто он там есть, но проявлялся только после того как ползунок пройдет...

    Также еще хотел узнать. возможно ли реализовать чтобы проценты шли за ПБ или в нем.
    067.jpg 238-295x147.jpg

    или самый простой пример с закруглением... Принцип как у первого, просто перед ПБ шла бы закругленная часть...
    free-psd-loading-bars-17.jpg
     
    Последнее редактирование: 31 май 2018
  2. Ветеран Модератор

    Регистрация:
    15 июн 2011
    Сообщения:
    911
    Симпатии:
    513
    Если хочешь, то разбирайся и дорабатывай. Делал несколько лет назад ничего не помню [​IMG]
     

    Вложения:

    • test13.7z
      Размер файла:
      42,8 КБ
      Просмотров:
      58
    Andrag, Nemko, audiofeel и ещё 1-му нравится это.
  3. Ветеран

    Регистрация:
    18 авг 2011
    Сообщения:
    205
    Симпатии:
    93
    Спасибо огромное... Ушел с головой в изучение)))
     
  4. Ветеран Супер модератор

    Регистрация:
    5 мар 2016
    Сообщения:
    370
    Симпатии:
    396
    Пол:
    Мужской
    EvilAlex, по по воду первого "скрина" пытался(когда-то) реализовать со свечением, вот что получилось(внизу немного подредактировал). Думаю не поздно( :$ ), а так TLabel прикрутить тот же принцип будет.
     

    Вложения:

    • pb.7z
      Размер файла:
      65,5 КБ
      Просмотров:
      41
    nizcoz и Xabib2302 нравится это.
  5. Ветеран

    Регистрация:
    13 май 2016
    Сообщения:
    177
    Симпатии:
    9
    Пол:
    Мужской
    Hello @Nemko !
    How to use that progress bar in a functional code? (last version of isdone)
     
  6. Ветеран Супер модератор

    Регистрация:
    5 мар 2016
    Сообщения:
    370
    Симпатии:
    396
    Пол:
    Мужской

    Вложения:

    • ISDone 0.6f.7z
      Размер файла:
      1,7 МБ
      Просмотров:
      29
    nizcoz и vint56 нравится это.
  7. Ветеран

    Регистрация:
    13 май 2016
    Сообщения:
    177
    Симпатии:
    9
    Пол:
    Мужской
    @Nemko How to move this progressbar in the same page? (right, left, up, down), and how to show this progressbar at uninstaller?
     
  8. Ветеран

    Регистрация:
    13 май 2016
    Сообщения:
    177
    Симпатии:
    9
    Пол:
    Мужской
    @Nemko Hi! If I do not use this progress bar, when I cancel the installation I see a message: undo changes, but when using this bar, when canceling the installation, labeltimes remain too. How do I eliminate them? (sorry for my bad english). Thanks!!
     
  9. Ветеран Супер модератор

    Регистрация:
    5 мар 2016
    Сообщения:
    370
    Симпатии:
    396
    Пол:
    Мужской
    nizcoz, to change the coordinates of the upper-left corner, you can use this procedure (with width and height there are problems with drawing ImgSetVisiblePart, difficult):
    Код (Inno):

    procedure ImgPBSetPos(var ProgressBar: ImgProgressBar; Left, Top: Integer);
    begin
      ProgressBar.Left:=Left; ProgressBar.Top:=Top;
      ProgressBar.PxLeft:=Left-(ProgressBar.PxBox div 2);
      ImgSetPosition(ProgressBar.BackGroundImg, ProgressBar.Left, ProgressBar.Top, ProgressBar.MaxWidth, ProgressBar.Height);
      ImgSetPosition(ProgressBar.TextureImg, ProgressBar.Left, ProgressBar.Top, ProgressBar.Width, ProgressBar.Height);
      ImgSetPosition(ProgressBar.PxImg1, Left-(ProgressBar.PxBox div 2), Top-(ProgressBar.PxBox div 2), ProgressBar.Width, ProgressBar.Height);
      ImgPBSetPosition(ProgressBar, ImgPBGetPosition(ProgressBar));
      ImgApplyChanges(ProgressBar.hParent);
    end;
    use procedure HideControls.
     
  10. Ветеран

    Регистрация:
    13 май 2016
    Сообщения:
    177
    Симпатии:
    9
    Пол:
    Мужской
    @Nemko Hi! procedure HideControls does not work. And.... this progress bar shows the displacement of the bar from 3 or 4%, before it seems that there is no movement, how to solve this? Thank you very much!!! (sorry for my bad english)
     
  11. Ветеран Супер модератор

    Регистрация:
    5 мар 2016
    Сообщения:
    370
    Симпатии:
    396
    Пол:
    Мужской
    nizcoz, hi, may just need to redraw the image, do without retreat. As in the example, from the bottom:
     

    Вложения:

    • Exp.7z
      Размер файла:
      25,3 КБ
      Просмотров:
      8
  12. Ветеран

    Регистрация:
    13 май 2016
    Сообщения:
    177
    Симпатии:
    9
    Пол:
    Мужской
    This is my procedure HideControls:

    Код (Text):
    procedure HideControls;
    begin
      ImgPBSetVisibility(ProgressBarEx, False);//
      WizardForm.FileNamelabel.Hide;
      ISDoneProgressBar1.Hide;
      LabelPct1.Hide;
      LabelCurrFileName.Hide;
      LabelTime1.Hide;
      LabelTime2.Hide;
      MyCancelButton.Hide;
    #ifdef SecondProgressBar
      ISDoneProgressBar2.Hide;
      LabelPct2.Hide;
    #endif
    end;
    but no work!
     

Поделиться этой страницей