I have an MDI ap that needs to display color coded icons for it's forms depending on the information the form is displaying. No problem I thought, just load up 5 different color icons into a .res file and set the form icon when the form displays. Problem is, my nice 256 color icons get squeezed down to 8 colors (see image attached - left of the shot is Explorer, right is my ap).
I found this thread where they ran into the same problem, but no solution. Anybody know of a workaround? The icons look fine when I add them to forms directly in the IDE property window. I'm loading the icons like this:
Code:Select Case eColor Case fcBlue Me.Icon = LoadResPicture(fiBlue, vbResIcon) Case fcRed Me.Icon = LoadResPicture(fiRed, vbResIcon) Case fcManilla Me.Icon = LoadResPicture(fiManilla, vbResIcon) Case fcGreen Me.Icon = LoadResPicture(fiGreen, vbResIcon) Case fcSilver Me.Icon = LoadResPicture(fiSilver, vbResIcon) End Select




Reply With Quote