RADIO Horizontal según un ARRAY

[dobfivewin]

Amigos del Foro...

Tengo un RADIO (Horizontal) cuya cantidad de Items a se arma según un array (en este ejemplo tiene 4 elementos)

en tema es que si la variable (mRESUL01) viene con un valor derminado (ejemplo 3) cuando se muestra el RADIO, NO se acomoda en el items 3°, NO se acomodad en ningun los items a seleccionar.

Code: Select all

    ColuRAD := 5
    For W = 1 TO len(TipoResu)
      If W = 1 
        @ lineRAD,ColuRAD RADIO     oRad01 VAR mRESUL01 ITEMS TipoResu[W] OF oDlgCar SIZE 20,10
      Else
        @ lineRAD,ColuRAD RADIOITEM TipoResu[W] RADIOMENU oRad01 OF oDlgCar SIZE 20,10
      EndIf
      ColuRAD := ColuRAD + 5 
    Next W

Se puede hacer ?

David
Argentina

[dobfivewin]

Estimados

Se puede?, o debo hacer de otra forma?

Gracias

David
argentina

[Daniel Garcia-Gil]

Hola David...

Colocal esto despues de crear los RADIOS

Code: Select all

oRad01:aItems[ mRESUL01 ]:lChecked := .T.

[dobfivewin]

Estimado Daniel


un espectaculo...

Muchas gracias

David
argentina

[dobfivewin]

Estimados....

Para agregar que el texto tenga un color determinado le coloco asi y no funciona

Code: Select all

    For W = 1 TO len(TipoSeleResu)
      If W = 1 
        @ lineRAD,ColuRAD RADIO     oRad01 VAR mRESUL01 ITEMS TipoSeleResu[W] OF oFol:aDialogs[1] SIZE 20,10 [b]COLOR nRGB(130,99,53)[/b]   
      Else
        @ lineRAD,ColuRAD RADIOITEM TipoSeleResu[W] RADIOMENU oRad01 OF oFol:aDialogs[1] SIZE 20,10 [b]COLOR nRGB(130,99,53)[/b]    
      EndIf
      ColuRAD := ColuRAD + SumCoRA
    Next W