Hi-Lite a radio button or checkbox to show Tab Order Cursor

[Rick Lipkin]

To All

I have multiple check boxes and radio buttons in my forms, however when you TAB thru the form and the cursor hits a radio or check box you do not see the cursor. has any one come up with a way to hi-lite a checkbox or a radio button to visually show that the cursor is on one of those controls ?

http://img4.imagetitan.com/img.php?imag ... hilite.jpg





Thanks
Rick Lipkin

[karinha]

Small samples? Code or Workshop.exe the best? Regards.

[Rick Lipkin]

João


I am looking for some code that when the cursor tabs into a radio button or a check box there is a way to highlight the control ( frame ) to visually let the user know where the cursor is located .. Now, when a user tabs thru the form .. it disappears when the cursor moves into a radio button or a check box ..

Thanks
Rick Lipkin

[karinha]

Maybe:

Code: Select all  Expand view  RUN

// Testing three states checkboxes - \samples\TESTCHK3.PRG
// Sample developed by EMG

#include "Fivewin.ch"

FUNCTION MAIN()

   LOCAL oDlg
   LOCAL oChk, lChk, nChk := 0

   SkinButtons()

   DEFINE DIALOG oDlg

   #define BM_GETCHECK 240
   #define BM_SETCHECK 241

   @ 1, 1 CHECKBOX oChk VAR lChk OF oDlg                        ;
      ON CLICK ( oChk:SendMsg( BM_SETCHECK, ( nChk + 1 ) % 3 ), ;
      nChk := oChk:SendMsg( BM_GETCHECK ) )

   #define BS_AUTO3STATE 6

   oChk:nStyle = NOR( WS_CHILD, WS_VISIBLE, WS_TABSTOP, BS_AUTO3STATE )

   @ 3, 1 BUTTON "&Close" ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED

RETURN NIL
 

[carlos vargas]

is a windows problems, please enable alt key subscript.
sorry for my bad english. i show a screenshot of my config.