- Code: Select all Expand view RUN
REDEFINE PAGES oPags ID 103 OF oDlg ;
DIALOGS 1010, 1010, 1010, 1010, 1010, 1010, 1010, 1010, 1010, 1010, ;
1010, 1010
REDEFINE TABS oTabs ID 102 OF oDlg ;
PROMPT "**", "A-B", "C-D", "E-F", "G-H", "I-J", "K-L", "M-N", "O-P", ;
"Q-R", "S-T", "U-V-W-X-Y-Z" ;
ACTION { oPags:setoption(oTabs:nOption)}
Para evitar fazer isto :
- Code: Select all Expand view RUN
oBrw := TXBrowse():New( oPags:aDialogs[ 1 ] )
oBrw := TXBrowse():New( oPags:aDialogs[ 2 ] )
oBrw := TXBrowse():New( oPags:aDialogs[ 3 ] )
.
.
.
Gostaria de algo assim:
- Code: Select all Expand view RUN
oBrw := TXBrowse():New( oPags:aDialogs[ oTabs:nOption ] )
Es possible ?
Evitando redundancia, ja que sao las mesma dialogs ?
Saludos Ale
