Как всегда - захотелось "бантиков" :)
В Win7 есть прогрессбар на кнопках taskbar'а, почему бы не испробовать.
Добавляю в OnCreate формы:
CoInitializeEx(nil, COINIT_APARTMENTTHREADED );
hr := CoCreateInstance( CLSID_TaskbarList, nil, CLSCTX_INPROC_SERVER, ITaskbarList3, iTaskBarlist);
if Succeeded( hr ) then iTaskBarlist.HrInit;
В
(
Read more... )