FiveTech Software tech support forums

... REDEFINE COMBOBOX cValue ID 100 OF oFld:aDialogs[ 1 ] ; ITEMS { "Red", "Green", "Blue" } REDEFINE BUTTON ID 110 OF oFld:aDialogs[ 1 ] ACTION oFld:SetOption(2) REDEFINE BTNBMP oB ID 111 OF oFld:aDialogs[2] ; RESOURCE "users" ACTIVATE DIALOG oDlg CENTERED ; ON INIT oFld:InitDialogs() // required ...

Fernando,

oFolder:SetOption( nOption )

... CODE 0008:7C0A 003CAH TRADMENU CODE 0008:7FD4 00072H NOPTION CODE 0008:8046 00057H _SELECT CODE 0008:809E 0008DH _SELECT CODE 0008:812C 000B3H SETOPTION CODE 0008:81E0 0015AH SETOPTION CODE 0008:833A 007E0H TRFILE CODE 0008:8B1A 003DBH TRGROUP CODE 0008:8EF6 000E1H HEADER CODE 0008:8FD8 000DBH ...

... CODE 0008:7C0A 003CAH TRADMENU CODE 0008:7FD4 00072H NOPTION CODE 0008:8046 00057H _SELECT CODE 0008:809E 0008DH _SELECT CODE 0008:812C 000B3H SETOPTION CODE 0008:81E0 0015AH SETOPTION CODE 0008:833A 007E0H TRFILE CODE 0008:8B1A 003DBH TRGROUP CODE 0008:8EF6 000E1H HEADER CODE 0008:8FD8 000DBH ...

... OF oFld:aDialogs[1] PICTURE "@x" ; VALID (ValProgra(lNew,@cPrograma,cXoc) .and. cambiafld(oFld)) UPDATE Static Function CambiaFld(oFld) oFld:Setoption(2) oFld:nOption:=2 oFld:Refresh() return .t. El primer get del folder 2 toma el foco sin hacerle :setfocus() ni nada por el estilo porque ...

Eduardo,

You may use <oFolder>:SetOption( <nOption> )

... CODE 0007:ABD2 001AFH PASTE CODE 0007:AD82 0011EH TRECT CODE 0007:AEA0 00030H __LOWMEMER CODE 0007:AED0 00196H _FWGENERRO CODE 0007:B066 000B3H SETOPTION CODE 0007:B11A 00150H SETOPTION CODE 0007:B26A 00051H MOVE CODE 0007:B2BC 00077H MOVE CODE 0007:B334 0004EH MOVE CODE 0007:B382 000BFH MOVE ...

... MDI CHild window ::WndBasic() if ::nWd == 1 ::Bar() endif if ::lFld ::oFld := TFolder():New( 5, 5, ::aFold,, ::oWnd,,,, .t.,,,,, .t. ) ::oFld:SetOption( ::nFld ) ::oFld:bChange := { || ::nOldFld := ::nFld, ::nFld := ::oFld:nOption, ::FldChg() } ::oFld:aDialogs[ ::nFld ]:bLClicked := { || ::nOldFld ...