It refresh only the tabs of the folder
please run this test
- Code: Select all Expand view
Function test()
Local oDlg,oFont
Local oFld,oRad1,nCltipo:=1
DEFINE DIALOG oDlg FROM 100, 100 TO 542,620;
STYLE DS_MODALFRAME + WS_POPUPWINDOW + WS_VISIBLE + WS_DLGFRAME + 4;
TITLE "test folder" PIXEL FONT oFont
//---------------------------------------------------------------------------//
@ 105, 5 FOLDEREX oFld ;
SIZE 250, 90 ;
OF oDlg ;
ITEMS "Sito Web","&Accesso internet","Archivio","Note" ;
FONT oFont ;
PIXEL
//---------------------------------------------------------------------------//
@ 82, 48 RADIO oRad1 VAR nCltipo PROMPT "&Sito Web" PIXEL SIZE 40, 12 OF oDlg;
ON CHANGE ( oFld:nOption:=nCltipo, oFld:REFRESH())
@ 82, 93 RADIOITEM "A&ccesso" RADIOMENU oRad1 PIXEL SIZE 40, 12 OF oDlg
@ 82, 135 RADIOITEM "&Archivio" RADIOMENU oRad1 PIXEL SIZE 40, 12 OF oDlg
@ 82, 185 RADIOITEM "Altro" RADIOMENU oRad1 PIXEL SIZE 40, 12 OF oDlg
@ 5, 5 SAY "&Internet:" OF oFld:aDialogs[1] SIZE 50, 8 PIXEL
@ 22, 5 SAY "&FTP:" OF oFld:aDialogs[1] SIZE 50, 8 PIXEL
@ 5, 5 SAY "&Dns1:" OF oFld:aDialogs[2] SIZE 50, 8 PIXEL
@ 5, 123 SAY "&Dns2:" OF oFld:aDialogs[2] SIZE 50, 8 PIXEL
@ 22, 5 SAY "&S.SMTP:" OF oFld:aDialogs[2] SIZE 50, 8 PIXEL
@ 39, 5 SAY "&S.POP:" OF oFld:aDialogs[2] SIZE 50, 8 PIXEL
@ 5, 5 SAY "&File:" OF oFld:aDialogs[3] SIZE 50, 8 PIXEL
@ 5, 5 SAY "&Note:" OF oFld:aDialogs[4] SIZE 50, 8 PIXEL
ACTIVATE DIALOG oDlg
return nil
Any Idea ?
I tried also with
@ 82, 48 RADIO oRad1 VAR nCltipo PROMPT "&Sito Web" PIXEL SIZE 40, 12 OF oDlg;
ON CHANGE ( oFld:nOption:=nCltipo, oFld:REFRESH(), oFld:aDialogs[nCltipo]:REFRESH())