FiveTech Software tech support forums

Buenos días:

Code: Select all  Expand view

    ofold:aEnable:={.f.,.f.,.f.,.f.,.t.,.t.}
 

Si tenemos un objeto folderex ofold este lleva una data que es el array aEnable, en el que como elementos lleva un valor lógico por cada pestaña del folder y este valor indica si está activo o desativado.
Un saludo

Internamente FolderEx utiliza para lo que necesitas un array ( aEnable )

Code: Select all  Expand view

oFolder:aEnable := { .F., .T., .F., .F. }
 

yo lo hago asi:

Local aFolder

aFolder := { .t.,.t.,.t.,.t.,.f.,.f.,.t.,.t. }

oFld:aEnable:= aFolder

Saludos

... ¿Es posible administrar estas opciones usando un RibbonBar? Leyendo encontré que se pueden deshabilitar los "Tabs" del RibbonBar (oRBar:aEnable[NoDeTab]:=.F.) y efectivamente lo deshabilita, pero me gustaría poder esconderlo (trate con la opción oRBar:hide[2]:=.T., pero no funciona). ...

oFld:aEnable := {.T.,.T.,.F.} clap clap ....I Know it ... I mean another argument I not Know the nOption value and the user select it from a menu when I open the folder I must show only that tab and block the others I must make ...

Tim
This control has a DATA aEnable ( array, len( aEnable ) equal len( aDialogs ) )
This DATA contains logicals values state of each dialog: .T. -> Enable, .F. .> Disable
oFldEx:aEnable := { .T., .F. }
In this case, second dialog is disabled

... WS_CLIPCHILDREN, 0 ) ) ; NAME cResName brush ::oBrush endif AAdd( ::aDialogs, oDlg ) AAdd( ::aPrompts, cItem ) AAdd( ::aHelps, cnHelpId ) AAdd( ::aEnable, .t. ) AAdd( ::aVisible, .t. ) AAdd( ::aBitmaps, { 0, 0, 0 } ) AAdd( ::aBrightBmp, 0 ) AAdd( ::aAlphaLevel,255) //Biel 1404 AAdd( ::aHasAlpha, ...

Joao,

oRibbonBar:aEnable[ n ] := .F.

... a la pestaña que quieras, aca como te digo las activas / desactivas, saludos... :shock: // INHABILITO PESTAÑA 2 SOLO POR LOS MOMENTOS... *oFolder:aEnable := {.t., .f., .t., .t., .t., .t., .t.} *oFolder:aEnable[2] := .f. // DESHABILITO LA PESTAÑA QUE QUIERA (por los momentos)

Try, oFolder:aEnable[.t., .t., .f., .t., .f.], saludos...

You can also write it this way

oFld:aEnable[2]:=.F. // this will disable tab 2

Richard

... "F3",; "F4"; SIZE 598, 356 PIXEL; OF oForm COLOR 0, 14215660 FONT oFont1 En el cual arranco de esta manera oFld:aEnable := {.T.,.F.,.F.,.F.} o sea solo activada la primer pestaña luego defino la tecla F2 SET KEY VK_F2 TO Opcion2(oDlg,oFld) y en la function Opcion2( ...

... ) lUno := .T. ENDIF DEFINE DIALOG oDls .....bla bla bla oFolder := TFolderEx():Redefine(100,oDls,aDialogs,,aPrompts,40,,5) IF lUno oFolder:aEnable := { .T., .F. } oFolder:aVisible := { .T., .F. } ENDIF ACTIVATE DIALOG oDls asi m ero y me va excelente, jejeje pequeño truco salu2 pak.o

... ON INIT (lNew:=.f.,oDlg:aEvalWhen(),oRad:SetOption(2),CliAlta(dCli,lAlt,oBrw), ; IIF((dCli)->(EOF()),EVAL(bCliVer),(oFol:SetOption(1),oFol:aEnable:={.t.,.f.,.f.,.f.,.f.},oBrw:SetFocus()))) ; VALID (NoEscape() .AND. CierraCli(dCli,dAge,dBco,dGpo,dFpg,oBrw)) ; NOWAIT // Asi no me funciona ...

... ( Better visible, to select enabled Pages ) Your Screenshot would look like : http://www.pflegeplus.com/pictures/delitem1.jpg oFld:aEnable = { lCheck[1], lCheck[2], lCheck[3], lCheck[4], lCheck[5], lCheck[6], ; lCheck[7], lCheck[8], lCheck[9], lCheck[10], lCheck[11], lCheck[12] ...