Como excluir ou esconder paginas em um Folder

[Joao Cezar]

Olá

Preciso excluir ou esconder paginas em um folder.

@ 054,002 FOLDER oFldVinc OF oDlgVinc ;
PROMPTS "&1-Folder1", "&2-Folder2", "&3-Folder3";
DIALOGS "FOLDER1", "FOLDER2", "FOLDER3";
PIXEL ;
SIZE 315,135

IF !lFolder1
// Aqui exclui ou esconde a pagina
ENDIF
IF !lFolder2
// Aqui exclui ou esconde a pagina
ENDIF
IF !lFolder3
// Aqui exclui ou esconde a pagina
ENDIF

--
[]'s

João Cezar
Goiânia / Brasil
joao.cezar@cultura.com.br

[Antonio Linares]

Code: Select all

IF !lFolder1 
   @ 054,002 FOLDER oFldVinc OF oDlgVinc ; 
      PROMPTS "&2-Folder2", "&3-Folder3"; 
      DIALOGS "FOLDER2", "FOLDER3"; 
      PIXEL ; 
      SIZE 315,135 
ENDIF 
IF !lFolder2 
   @ 054,002 FOLDER oFldVinc OF oDlgVinc ; 
       PROMPTS "&1-Folder1", "&3-Folder3"; 
       DIALOGS "FOLDER1", "FOLDER3"; 
       PIXEL ; 
       SIZE 315,135 
ENDIF 
IF !lFolder3 
   @ 054,002 FOLDER oFldVinc OF oDlgVinc ; 
       PROMPTS "&1-Folder1", "&2-Folder2"; 
       DIALOGS "FOLDER1", "FOLDER2"; 
       PIXEL ; 
       SIZE 315,135 
ENDIF