FiveTech Software tech support forums

Posted: **Sun Mar 26, 2006 4:02 am**

Ola amigos

Eu tenho assim

REDEFINE DIALOG oDlg RESOURCE .....

REDEFINE FOLDER oFld ID 5000 OF oDlg
PROMPT "&1-Produto" ,"&2-Valores de Compra/Venda" ;
DIALOGS "PRODUTO_1","PRODUTO_2";

REDEFINE GET OGqtdes VAR VMqtdes ID 109 OF oFld:aDialogs[1] PICTURE "@E 99,999.99" UPDATE FONT oFont

REDEFINE GET VMQTMEDI_ESTO ID 110 OF oFld:aDialogs[1] PICTURE "@E 99,999.99" UPDATE FONT oFont
REDEFINE GET VMSTQMIN_ESTO ID 111 OF oFld:aDialogs[1] PICTURE "@E 99,999.99" UPDATE FONT oFont
REDEFINE GET VMQTPEDI_ESTO ID 112 OF oFld:aDialogs[1] PICTURE "@E 99,999.99" UPDATE FONT oFont

REDEFINE SAY PROMPT VMDESCON_MARC ID 101 OF oFld:aDialogs[2] UPDATE
REDEFINE SAY PROMPT VMVRLUCR_MARC ID 102 OF oFld:aDialogs[2] UPDATE
REDEFINE SAY PROMPT VMVRFRET_MARC ID 103 OF oFld:aDialogs[2] UPDATE

ACTIVATE DIALOG oDlg CENTERED ON INIT
( ofld:aDialogs[2]:Hide() ) // AKI NO ME FUNCIONA

apenas limpa os SAY PROMPT mais naum apaga o PROMPT do FOLDER

como debo faze-lo

Jackson Douglas
Boa Vista - RR

FWH 2.6 LAST BUILD + XH 99.2

Posted: **Sun Mar 26, 2006 8:08 am**

( ofld:aDialogs[2]:Hide(), ofld:SetPrompts( { "&1-Produto" } ) )

Posted: **Sun Mar 26, 2006 3:30 pm**

Ola antonio

Funcionou 1000 maravilhas, mais agora como faço para ADICIONAR uma DIALOG na FOLDER em tempo de execução

tipo assim:

oFld:AddItem("&Teste") ok funciona

mais como faço para colocar a DIALOG ??

Jackson Douglas
Boa Vista - RR
Brasil

Posted: **Tue Mar 28, 2006 5:01 pm**

Jackson,

Tendrias que modificar la clase TFolder de esta forma:

Code: Select all

METHOD AddItem( cItem, cResName ) CLASS TFolder

   local oDlg, nLen, n
   local oThis := Self

   DEFINE DIALOG oDlg OF Self STYLE WS_CHILD ;
      FROM 0, 0 TO oThis:nHeight - oThis:nFdHeight - 5, oThis:nWidth - 6 ; PIXEL NAME cResName
...

oFolder:AddItem( "&Teste", "test" ) // siendo test un diálogo en recurso

Posted: **Wed Mar 29, 2006 12:42 am**

Gracias Antonio

Mais uma modificação que poderias colocar no proximo BUILD

Otra que poderias modificar na CLASSE TFOLDER seria a DelItem( nPrompt, cFolder ), isto é só uma ideia

Jackson Douglas C. Brito
Boa Vista - RR
Brasil

Posted: **Wed Oct 14, 2009 10:21 pm**

ok.

Les agradezco pero pero ninguna de las dos cosas me funciona para lo que yo quiero. no entiendo por que es tan complicado esconder un tab. con la opcion de Karinha me funciono pero lo unico malo es que no tengo solo 2 tabs tengo 6 tabs.

y necesito ocultar 1 de ellos segun una opcion de mi sistema.

Atenamente
Julio Ponce

FiveTech Software tech support forums

Hide (esconder) um Folder em tempo de execução

Hide (esconder) um Folder em tempo de execução

Re: Hide (esconder) um Folder em tempo de execução