FiveTech Software tech support forums

Antonio,

En el ON INIT SetWindowTheme( oFolder:hWnd, "", "" ) y funciona perfectamente.

Saludos,

Ruben,

oFolder:lBorder es nil. Prueba a signarlo así:

oFolder:lBorder = .F.

Has modificado esa clase ? No encuentro TCFOLDEREX

Try oFolder:SetOption( 2 )

try with
oApp():oFolder:bPopup := { | o | MenuTabs( oApp():oFolder ) }

Antonio Gracias


Lo estoy haciendo de la siguiente forma;

REDEFINE GET oDia[8] VAR aFila[12] ID 117 SPINNER OF oFolder:aDialogs[1] PICTURE "@R 99:99"

Un saludo y gracias de nuevo
Gabriel
Granada

... tu problema. Yo lo haría asi: 1.- Crearía una tabla con tantos elementos como diálogos va a tener el FOLDER ( aMiArray ), lo puedes saber por Len( oFolder:aDialogs ) 2.- En cada elemento de ese array asignaria el array que va a aparecer en su diálogo y browse correspondiente 3.- Con la DATA oFolder:nOption ...

I add a item on folderex control

oFolder:AddItem(cRaTitolo)

it run ok

How I can make to control if the user have allready create the same tab on folder ? and if it is allready created run the command setoption ?

Saludos Tuve que hacer algo asi y me funciono, que te expongo en tu ejemplo: [code} FUNCTION build_pages( oFolder ) LOCAL oDialog FOR J := 1 TO LEN( oFolder:aPrompts ) DEFINE DIALOG oDialog OF oFolder STYLE NOR( WS_VISIBLE, WS_DLGFRAME, WS_CHILD) TRANSPARENT FOR I := 1 TO LEN(oBtn) ...

I allready use oWndMain:oClient := oFolder
Thee folder became small but the splitte isr not move on the left

Silvio,

have you tried

oWndMain:oClient := oFolder

are you using MDI ? If so, then try:

oWndMain:oWndActive:oClient := oFolder

Mario,

haz probado a usar la clausula WHEN en tus controles restantes (gets y combos) para no usar el disable y enable, y probar con ofolder:adialogs[x]:aEvalWhen() como comenta jose luis, para ver si el comportamiento es diferente.

Saludos

... RETURN __ObjSendMsg( oObj, cMsg ) function FT_FOLDER() local aFld:=ARRAY(3) local oDlg := QDialog() local oLayout := QVBoxLayout() local oFolder := QTabWidget( oDlg ) oDlg:SetLayout( oLayout ) oLayout:AddWidget( oFolder ) oDlg:SetWindowTitle( "A folder" ) oDlg:Resize( 400, 400 ...

Por lo que vi en el foro para la TFolder creo seria asi...


oFolder:aDialog[ n ]:hide()

oFolder:aDialog[ n ]:show()

intentalo haber o revisa la clase, hace mucho que no trabajo con TFolder, saludos...

... focus 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)

... := { | nRow, nCol, nStyleLine | ColoresTexto( nRow, nCol, nStyleLine, oDlg2 ) } STATIC Function ColoresTexto( pnRow, pnCol, pnStyle, oFolder ) Local cColor, nPaso, i:=0, cCampo:="" DO CASE CASE pnStyle = 0 .AND. pnCol = 6 .AND. (S13)->MV_CARG < 0 cColor := CLR_HRED ...