Color en un item de RADIO

[Willi Quintana]

Mis estimados, se puede poner color en las opciones de RADIO ?
* Opcion 1
* Opcion 2
* Opcion 3


https://uploadnow.io/f/2sMPsC7

[Antonio Linares]

Estimado Willi,

Solo funciona sin uso de temas

Code: Select all | Expand

#include "FiveWin.ch"

//----------------------------------------------------------------------------//

function Main()

   local oDlg, oRadMenu, oBrush
   local nOption := 2

   DEFINE DIALOG oDlg RESOURCE "Radios"

   REDEFINE RADIO oRadMenu VAR nOption ID 110, 120, 130, 140, 150 OF oDlg ;
      ON CHANGE MsgBeep()

   REDEFINE BUTTON ID 100 OF oDlg ACTION oRadMenu:GoNext() ;
      WHEN nOption == 3

   REDEFINE BUTTON ID 102 OF oDlg ACTION oRadMenu:GoPrev()

   ACTIVATE DIALOG oDlg CENTERED ;
      ON INIT oRadMenu:aItems[ 1 ]:SetColor( CLR_GREEN, RGB( 240, 240, 240 ) )

return nil

//----------------------------------------------------------------------------//

[Willi Quintana]

Gracias Antonio,
Funciona Perfecto...
GRacias