Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
#DEFINE COLOR_SCROLLBAR 0
#DEFINE COLOR_ACTIVECAPTION 2
#DEFINE COLOR_WINDOW 5
#DEFINE COLOR_WINDOWFRAME 6
#DEFINE COLOR_MENUTEXT 7
#DEFINE COLOR_WINDOWTEXT 8
DECLARE INTEGER GetSysColor IN "user32" INTEGER nIndex
DECLARE INTEGER SetSysColors IN "user32";
INTEGER nChanges,;
INTEGER @ lpSysColor,;
INTEGER @ lpColorValues
* save old color
lnSavedColor = GetSysColor (COLOR_WINDOWFRAME)
* change the color
nChanges = 1
lpSysColor = COLOR_WINDOWFRAME
lpColorValues = RGB (0, 0, 255) && bright blue
? SetSysColors (nChanges, @lpSysColor, @lpColorValues)
= MESSAGEB ("The window frame color is changed", 64, "Win32 SetSysColor")
* restore the old value
? SetSysColors (nChanges, @lpSysColor, @lnSavedColor)
= MESSAGEB ("The window frame color is restored", 64, "Win32 SetSysColor")