PRB: Check Boxes Don't Display in Certain Situations

ID: Q130729

The information in this article applies to:

Microsoft FoxPro for Windows, versions 2.5, 2.5a, 2.5b, 2.6, 2.6a

SYMPTOMS

You aren't able to see a check box or radio button when it is highlighted (selected) except for the outline around the object.

CAUSE

You may be using an incompatible color combination of the pen and fill colors for the object that nullifies the display of an element like an X in a check box, and the mode of the get object(s) may be set to TRANSPARENT.

WORKAROUND

Ensure that the GET object is marked as OPAQUE and that your color combinations do not conflict with each other. For example, a white fill color would conflict with a white pen color.

STATUS

This behavior is by design.

MORE INFORMATION

Steps to Reproduce Behavior

Run the following code:

CREATE TABLE Test (FieldA L(1), FieldB L(1), FieldC L(1))

DEFINE WINDOW test ;

  AT 0.000, 0.000 ;
  SIZE 10.385,74.400 ;
  FONT "MS Sans Serif", 8 ;
  FLOAT ;
  NOCLOSE ;
  MINIMIZE ;
  SYSTEM ;
  COLOR RGB(,,,0,0,255)

ACTIVATE WINDOW test NOSHOW

@ 1.846,12.000 GET Test.fielda ;

  PICTURE "@*C field a" ;
  SIZE 1.308,10.333 ;
  DEFAULT 0 ;
  FONT "MS Sans Serif", 8 ;
  STYLE "B" ;
  COLOR ,,,,,,,,RGB(255,255,255,0,0,255),RGB(255,255,255,0,0,255)

@ 1.923,28.800 GET Test.fieldb ;

  PICTURE "@*C field b" ;
  SIZE 1.308,10.333 ;
  DEFAULT 0 ;
  FONT "MS Sans Serif", 8 ;
  STYLE "B" ;
  COLOR ,,,,,,,,RGB(255,255,255,0,0,255),RGB(255,255,255,0,0,255)

@ 1.846,48.000 GET Test.fieldc ;

  PICTURE "@*C field c" ;
  SIZE 1.308,10.333 ;
  DEFAULT 0 ;
  FONT "MS Sans Serif", 8 ;
  STYLE "B" ;
  COLOR ,,,,,,,,RGB(255,255,255,0,0,255),RGB(255,255,255,0,0,255)

@ 5.538,19.200 GET Butval ;

  PICTURE "@*HN Add record;Quit" ;
  SIZE 1.769,12.500,0.667 ;
  DEFAULT 1 ;
  FONT "MS Sans Serif", 8 ;
  STYLE "B" ;
  VALID ButtonCode()

IF NOT WVISIBLE("test")

  ACTIVATE WINDOW test

ENDIF

READ CYCLE

RELEASE WINDOW test

SELECT test USE

FUNCTION ButtonCode     &&  Butval VALID

Do Case

  Case Butval = 1
    Append Blank
  Case Butval = 2
    Clear Read

Endcase Show Gets

Additional reference words: FoxWin 2.50 2.50a 2.50b 2.60 2.60a disabled unselected KBCategory: kbprg kbprb KBSubcategory: FxprgGeneral