Как мне показать прогресс в кнопке панели состояния / панели задач с помощью Delphi 7?

Если вы копируете файлы в Windows 7, вы увидите прогресс копирования в виде индикатора выполнения, который отображается в строке состояния или на панели задач. кнопка приложения

Можно ли этого добиться с помощью Delphi 7?

У меня есть длительная операция, которая идеально подходит для демонстрации ее прогресса таким образом.

пример такой кнопки с использованием копирования с Total Commander

.