FIX: Background Color in Text Box Does Not Use Dithered Colors

MORE INFORMATION

Steps to Reproduce Problem

Create a program containing the following code and run it:

  PUBLIC myform
   myform = CREATEOBJECT('form')
   myform.ADDOBJECT("mytext", "textbox")
   WITH myform.mytext
     .LEFT = 15
     .TOP = 6
     .VISIBLE = .T.
     .BACKCOLOR = rgb(128,255,255)  && Should change the back color to a
     ** light blue
   ENDWITH
   myform.ADDOBJECT("mycheckbox", "checkbox")
   WITH myform.mycheckbox
     .LEFT = 15
     .TOP = 50
     .VISIBLE = .T.
     .CAPTION = "Check 1"
     .BACKCOLOR = RGB(128,255,255) && Should change the back color to a
     ** light blue
   ENDWITH
   myform.ADDOBJECT("myedit", "editbox")
   WITH myform.myedit
     .LEFT = 200
     .TOP = 40
     .VISIBLE = .T.
     .BACKCOLOR = rgb(128,255,255) && Should change the back color to a
     ** light blue
   ENDWITH
   myform.ADDOBJECT("mylabel", "label")
   WITH myform.mylabel
     .LEFT = 200
     .TOP = 6
     .VISIBLE = .T.
     .BACKCOLOR = rgb(128,255,255) && Should change the back color to a
     **light blue
   ENDWITH
   myform.SHOW
				

The solid side of your RGB color pair may vary due to your video driver. To see what the solid and color side of your RGB color pair is, go to the Control Panel in Windows, and double-click the Colors icon. Click the Color Palette button, and then click the Define Custom Color button. Then enter 128 for Red, 255 for Green, and 255 for Red. You will see that the Color side of RGB(128,255,255) is a light blue but the solid side is Gray, White, or Blue Gray depending on your video driver. (You can also use the Custom Color Palette in Visual FoxPro to do this.)