18.09.2008, 13:25
|
 |
Администратор
|
|
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,555
Версия Delphi: Delphi 7
Репутация: выкл
|
|
Цитата:
|
Сообщение от Vayrus
Посадить ПрогрессБар на таймер:
процедура Таймер1;
начало
ПрогрессБар1.Позиция := ВызовФункцииПолученияЗагрузкиЦП;
конец;
|
Гениально!  |