The abnormal painting are only in VISTA and 7 visible! The next code in the original control.prg is not the solution for this ugly problem with says. On every click on checkbox or radio the says are overpainted and becomes bigger and bigger!
if Upper( ::ClassName() ) $ "TCHECKBOX;TRADIO;TGROUP"
// Without the above IF condition, says with border in themed apps
// on transparent dialogs with solid color background
// are not painted correctly. With each click of checkbox / radio
// border and say text are overpainted one pixel down & one pixel right
DrawPBack( ::hWnd, hDC )
//ParentImage( ::hWnd, hDC )
endif