Theme applied causes some discoloration on menubars

Only in some applications, some themes, some times, when a new theme
is applied, some programs' menu bars go white as you highlight each
item and stay white. It is weird. Doesn't always happen, nor always
with the same themes.

Any ideas?

Even reboot doesn't seem to fix this.


---Atreju---

Hi,

By default, it is set to white.

Right click the Desktop/Properties/Appearance/Advanced. Select "Menu" from
the drop box and set the color for background.

--
Happy Easter,
Kelly

Microsoft-MVP Windows® XP

Troubleshooting Windows XP
http://www.kellys-korner-xp.com

Taskbar Repair Tool Plus!
http://www.kellys-korner-xp.com/taskbarplus!.htm


"Atreju" <someone@who.hates.junkmail> wrote in message
news:lj9d70t52sui1njib89rn4k0rmj2jmno8v@4ax.com...

> Only in some applications, some themes, some times, when a new theme
> is applied, some programs' menu bars go white as you highlight each
> item and stay white. It is weird. Doesn't always happen, nor always
> with the same themes.
>
> Any ideas?
>
> Even reboot doesn't seem to fix this.
>
>
> ---Atreju---

On Fri, 9 Apr 2004 13:56:15 -0500, "Kelly" <kelly@mvps.org> wrote:

>Hi,
>
>By default, it is set to white.
>
>Right click the Desktop/Properties/Appearance/Advanced. Select "Menu" from
>the drop box and set the color for background.

Thanks!


---Atreju---

I posted about this here:

http://www.google.com/groups?hl=en&l...tngp13.phx.gbl

The following text (everything between the lines) can be saved with a ..vbs extension and run as a script to toggle the FlatMenus bit.

Keith

---------------------------------------------------------------------------
'Toggle the Flat Menus bit

Set WSHShell = WScript.CreateObject("WScript.Shell")
Upm = "HKCU\Control Panel\Desktop\UserPreferencesMask"

dim MenuState

MenuState = Array ("Off", "On")

MaskBytes = WSHShell.RegRead (Upm)

FlatMenuOn = (MaskBytes(2) and &H02) \ 2

Message2 = "Flat Menus are currently turned " & MenuState(FlatMenuOn) & "." & vbCR &vbCR
Message2 = Message2 & "Running this script will turn them " & MenuState(Abs((FlatMenuOn - 1))) & "." & vbCR & vbCR
Message2 = Message2 & "('On' is the 'correct' setting for XP style display)" & vbCR & vbCR
Message2 = Message2 & "Continue?"

X = MsgBox(Message2, vbYesNo, "Toggle Flat-Menu Setting")

If X = 6 Then

MaskBytes(2) = CByte(MaskBytes(2) Xor &H02)

MaskStr = ""
for each MaskByte in MaskBytes
strByte = right( "00" & hex(MaskByte), 2 )
MaskStr = strByte & MaskStr
next

WSHShell.RegWrite Upm, CLng("&H" & MaskStr), "REG_BINARY"

MsgBox "You must logoff/logon for changes to take effect." & vbcr & vbcr, 4096, "Action Completed"

Else

MsgBox "No changes were made to your system." & vbcr & vbcr, 4096, "Action Cancelled"

End If

---------------------------------------------------------------------------------------------------
"Atreju" <someone@who.hates.junkmail> wrote in message news:lj9d70t52sui1njib89rn4k0rmj2jmno8v@4ax.com...

> Only in some applications, some themes, some times, when a new theme
> is applied, some programs' menu bars go white as you highlight each
> item and stay white. It is weird. Doesn't always happen, nor always
> with the same themes.
>
> Any ideas?
>
> Even reboot doesn't seem to fix this.
>
>
> ---Atreju---