Рекомендую как самый простой способ - использовать ProgressBar.
Для размещения этого элемента на форме выберите в инструментах Конструктора форм ActiveX Control (OLE Control) и отметьте его место на форме. Затем в появившемся списке выберите Microsoft ProgressBar Control SP6.

ProgressBar можно ориентировать как вертикально, так и горизонтально. Свойства Min и Max определяют начальное и конечное выводимые значения шкалы, в свойство Value записывайте текущее значение - разбейте процесс вычисления на этапы, используйте какую-нибудь локальную переменную как счётчик.

Советую при этом установить _VFP.AutoYield = .f., иначе нажатие на кнопку Esc при работе ProgressBar'а, например, может крахнуть программу.

Вообще-то это самая распространённая в Windows шкала.