Delphi колеблющийся индикатор выполнения

Question

Я пытаюсь создать колеблющийся индикатор выполнения на форме, т.е.Я хотел бы, чтобы индикатор выполнения начинался с 0, переходил к завершению и затем возвращался.Точно так же, как огни, которые использовались на Китте из Night Rider, или новые индикаторы выполнения Windows 7.

Кто-нибудь знает, как этого добиться в Delphi XE.

С уважением, Питер.

Answer 1

Попробуйте TProgressBar и установите Стиль на pbstMarquee. Может быть, то, что вы ищете.

Answer 2

Есть очень хороший индикатор выполнения (в комплекте с исходным кодом), стилизованный под индикатор выполнения Ubuntu, по адресу http://jd -powered.net / notes / ubuntuprogress-delphi-component

Answer 3

Вы должны установить стиль на pbstMarquee. Другое свойство для установки - MarqueeInterval, которое контролирует скорость анимации.

Я не верю, что с простым индикатором прогресса Delphi индикатор прогресса может перемещаться слева направо, а затем возвращаться справа налево, как KITT! Как только он попадает вправо, он начинается снова слева.