Par2: Change progress bar color 2008-09-05 -- Brett Carnaby The following allows color changes on a progress bar.
MODULE('Windows.DLL')
SendMessage(ULONG hWnd,ULONG uMsg, ULONG wParam, LONG
lParam),LONG,PASCAL,NAME('SendMessageA') ,proc
END
MODULE('COMCTL32.DLL')
InitCommonControls(),PASCAL
END
InitCommonControls()
Select(?Progress:Thermometer)
SendMessage(?Progress:Thermometer{PROP:HANDLE},PBM_SETBARCOLOR,0,65280)
SendMessage(?Progress:Thermometer{PROP:HANDLE},CCM_SETBKCOLOR,0,16777215)
Printed April 29, 2024, 4:16 am This article has been viewed/printed 35123 times. |