Action em menu com submenu

Kbelo · June 8, 2007

Ola pessoal.

Como eu faÃ§o para colocar um action num menu que tenha submenus.

Eu coloqueo no Action mas sempre clico com o mouse ou

teclo enter ele abre o submenu.

Alguem sabe se isto Ã© possivel?

e como fazer?

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

Kbelo · June 8, 2007

Ola pessoal.

Como eu faÃ§o para colocar um action num menu que tenha submenus.

Eu coloqueo no Action mas sempre clico com o mouse ou

teclo enter ele abre o submenu.

Alguem sabe se isto Ã© possivel?

e como fazer?

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

kapiaba · June 8, 2007

citaÃ§Ã£o:
Ola pessoal.

Como eu faÃ§o para colocar um action num menu que tenha submenus.

Eu coloqueo no Action mas sempre clico com o mouse ou

teclo enter ele abre o submenu.

Alguem sabe se isto Ã© possivel?

e como fazer?

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

id=quote>id=quote>

MARCELO... NAO DEU PARA ENTENDER A PERGUNTA...

SE POSTARES PARTE DO CODIGO, FICARA MAIS FACIL ENTENDER O QUE QUERES.

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Skype: fw_kapiaba

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Editado por - kapiaba on 08/06/2007 10:15:13

Kbelo · June 8, 2007

Veja o que eu quero Ã© um action em um menu que possua submenus.

SÃ³ que ao invez de executar "Funcao()" ele abre o submenu.

MENU oMenu MENUBAR;

MENUITEM "Gerenciador de Acesso"

MENU

MENUITEM "Configurar Senha de Acesso(Somente Suporte)" RESOURCE "GRIFF_TO" ACTION Funcao()id=red>

MENU

MENUITEM "Novo Usuario" RESOURCE "GRIFF_TO" ACTION ConfigSenha(1)

MENUITEM "Altera Usuario" RESOURCE "GRIFF_TO" ACTION ConfigSenha(2)

ENDMENU

MENUITEM "Alterar Senha de Acesso" ACTION MODSEN()

MENUITEM "Excluir Senha de Acesso(Somente Suporte)" ACTION ExcluiSenha()

ENDMENU

id=code>id=code>

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

Editado por - kbelo on 08/06/2007 10:33:13

kapiaba · June 8, 2007

MENU oMenu

MENUITEM "Comercial"

MENU

MENUITEM "Clientes" ;

MENU

MENUITEM "Clientes" ;

RESOURCE "PRINTER" ;

ACTION( ( CLIENTES() ) )

SEPARATOR

MENUITEM "FuncionÃ¡rios" ;

RESOURCE "PRINTER" ;

ACTION( ( FUNCIONA() ) )

ENDMENU

id=code>id=code>

veja, que o PONTO E VIRGULA nao EXISTE. estais escrevendo TUDO NA MESMA LINHAÂ´Â´...

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Skype: fw_kapiaba

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Kbelo · June 8, 2007

????

NÃ£o entendi...

Ou eu nÃ£o to entendendo a sua resposta ou voce nao entendeu minha pergunta...

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

pauloaraujo · June 8, 2007

citaÃ§Ã£o:
MENU oMenu MENUBAR;id=red>id=size6>

id=quote>id=quote>

Ã‰ que vocÃª colocou um ponto e vÃrgula no lugar errado.

Agora, ou vocÃª coloca o ACTION no Menu ou no sub-menu. Que

tipo de aÃ§Ã£o vocÃª estÃ¡ querendo executar no Menu, que nÃ£o

possa ser feita no sub??

Editado por - pauloaraujo on 08/06/2007 13:57:12

evandro · June 8, 2007

OlÃ¡,

Marcelo, eu tambÃ©m tentei algo assim hÃ¡ mais tempo e nÃ£o consegui. NÃ£o executa mesmo.

[]s,

Evandro G. de Paula

Curvelo - MG

evandro@skillnet.com.br (Escr. - na Cidade)

imortal@skillnet.com.br (Res. - na RoÃ§a)

FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib

kapiaba · June 8, 2007

MENUITEM "Configurar Senha de Acesso(Somente Suporte)" ;

RESOURCE "GRIFF_TO" ACTION Funcao()

isto tambem nao e legal...

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Skype: fw_kapiaba

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Geraldo (gbsilva) · June 8, 2007

Marcelo se entendi vocÃª pode colocar na sua funÃ§Ã£o ConfigSenha(1) mais ou menos assim e tira aquela chamada funcao() no seu menu deixa apenas no sub-menu.

Fucntion ConfigSenha(lFlag)

if lFlag = 1

Chama novo usuÃ¡rio

else

Altera usuÃ¡rio

endif

... restante do cÃ³digo

return nil

Desculpe se nÃ£o for isso.

Geraldo B. Silva

FWH 2.6 Junho/2005, xHarbour 0.99.50 (Simplex), Bcc55, Pelles, xDev, MyMake, Sqllib e MySql.

lucgera@terra.com.br

SÃ£o Paulo - SP

Kbelo · June 8, 2007

Ã‰ realmente foi vcs que nÃ£o entenderam a minha Logica pois nao tem nada de errado nela e nao precisa de nenhum ;id=size6>id=red>

citaÃ§Ã£o:
OlÃ¡,

Marcelo, eu tambÃ©m tentei algo assim hÃ¡ mais tempo e nÃ£o consegui. NÃ£o executa mesmo.

id=quote>id=quote>

Eu tenho um configurador de menus onde o Administrador ou responsavel escolhe

quais menus o usuario pode acessar.

Assim um funcionario do financeiro nao fica fuÃ§ando na parte da produÃ§Ã£o.

Bom nesse meu configurado quando clico no menu ele seleciona.

Mas ai tenho que fazer um a um.

Eu queria que ao clicar em um menu que tenha um sub-Menu ja selecionasse todos os sub-menus.

Eu ja tinha pensado em uma soluÃ§Ã£o de incluir abaixo dos menus um novo sub-Menu "Seleciona Todos".

Bom se nÃ£o tem soluÃ§Ã£o vou ter que fazer assim mesmo.

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

kapiaba · June 8, 2007

Deixa eu ver se entendi...

Voce quer um SUBMENU na JANELA DO WINDOWS ou em UM BOTAO?

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Skype: fw_kapiaba

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Kbelo · June 8, 2007

MENU oMenu

MENUITEM "Comercial" Action AquiNada() id=red>

MENU

MENUITEM "Clientes"Action AquiFuncionaNormal() id=red>

MENUITEM "Fornecedor"Action AquiTbFuncionaNormal() id=red>

ENDMENU

id=code>id=code>

Veja as partes em vermelho

No sub menu funciona tudo blz normalzinho.

A minha duvida era que se tem a possibilidade de no menu em que tem a funcao AquiNada()id=red> executasse essa funÃ§Ã£o.

Hoje se teclar ali ele abre o submenu.

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

Editado por - kbelo on 08/06/2007 17:00:35

zekasan · June 8, 2007

MENU oMenu

MENUITEM oItem1 prompt "Comercial" ...

MENU

MENUITEM "CLIENTES" ...

MENUITEM "FORNECEDOR" ...

ENDMENU

END MENU

proc Desativa_Menu()

oItem1:Disable()

return

proc Ativa_Menu()

oItem1:Enable()

return

Ã‰ isso que vc queria????

clipper - vasculhando fivewin e o xharbour

Kbelo · June 8, 2007

NÃ£o eh habilitar e desabilitar mas sim executar a funÃ§Ã£o.

Mas ja pesquisei em tudo que eh lado nÃ£o vi soluÃ§Ã£o.

Em javaScript foi facil por isso que ainda estou pesquisando

pois se um pode nÃ³s tb podemos ou pelo menos tentar.

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

kapiaba · June 8, 2007

citaÃ§Ã£o:
NÃ£o eh habilitar e desabilitar mas sim executar a funÃ§Ã£o.

Mas ja pesquisei em tudo que eh lado nÃ£o vi soluÃ§Ã£o.

Em javaScript foi facil por isso que ainda estou pesquisando

pois se um pode nÃ³s tb podemos ou pelo menos tentar.

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

id=quote>id=quote>

DESCULPE CARISSIMO, MAS EU ACHO, QUE O QUE VOCE QUER FAZER, SOMENTE E POSSIVEL, USANDO UM SUBMENU POP UP.

Porque nao usas um BOTAO Para hacer esto? Bem mais simples...

DEFINE BUTTON OF OBAR RESOURCE "ORGANIZAR" ;

MESSAGE "Reorganizar(Indexar) Bancos de Dados" ;

TOOLTIP "Reorganizar(Indexar) Bancos de Dados" ;

ACTION( ( Click(), REINDEXA(0) ) ) ;

NOBORDER GROUP ;

CENTER ;

MENU MENUINDICES()

//

STATIC FUNCTION MENUINDICES()

LOCAL oMenu

MENU oMenu POPUP

MENUITEM "IndexaÃ§Ã£o de Todos os Arquivos " ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(0) ) ) ;

MESSAGE "Reorganiza, Limpa e Faz a IndexaÃ§Ã£o " + ;

"Geral dos Bancos de Dados"

SEPARATOR

MENUITEM ( "Indexar Somente Agenda Pessoal " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(1) ) ) ;

MESSAGE "Indexar Somente Agenda Pessoal "

SEPARATOR

MENUITEM ( "Indexar Somente Clientes " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(2) ) ) ;

MESSAGE "Indexar Somente Clientes "

SEPARATOR

MENUITEM ( "Indexar Somente Coleta de PreÃ§os " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(3) ) ) ;

MESSAGE "Indexar Somente Coleta de PreÃ§os "

SEPARATOR

MENUITEM ( "Indexar Somente Contas a Pagar " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(4) ) ) ;

MESSAGE "Indexar Somente Contas a Pagar "

SEPARATOR

MENUITEM ( "Indexar Somente Contas a Receber " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(5) ) ) ;

MESSAGE "Indexar Somente Contas a Receber "

SEPARATOR

MENUITEM ( "Indexar Somente Contra Vales " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(6) ) ) ;

MESSAGE "Indexar Somente Contra Vales "

SEPARATOR

MENUITEM ( "Indexar Somente CotaÃ§Ã£o de PreÃ§os " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(7) ) ) ;

MESSAGE "Indexar Somente CotaÃ§Ã£o de PreÃ§os "

SEPARATOR

MENUITEM ( "Indexar Somente Entradas do MÃªs " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(8) ) ) ;

MESSAGE "Indexar Somente Entradas do MÃªs "

SEPARATOR

MENUITEM ( "Indexar Somente Estoque " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(9) ) ) ;

MESSAGE "Indexar Somente Estoque "

SEPARATOR

MENUITEM ( "Indexar Somente Fornecedores " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(10) ) ) ;

MESSAGE "Indexar Somente Fornecedores "

SEPARATOR

MENUITEM ( "Indexar Somente Operadores " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(11) ) ) ;

MESSAGE "Indexar Somente Operadores "

SEPARATOR

MENUITEM ( "Indexar Somente os OrÃ§amentos " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(12) ) ) ;

MESSAGE "Indexar Somente os OrÃ§amentos "

SEPARATOR

MENUITEM ( "Indexar Somente Outras Saidas " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(13) ) ) ;

MESSAGE "Indexar Somente Outras Saidas "

SEPARATOR

MENUITEM ( "Indexar Somente Plano de Contas " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(14) ) ) ;

MESSAGE "Indexar Somente Plano de Contas "

SEPARATOR

MENUITEM ( "Indexar Somente Pedidos do MÃªs " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(15) ) ) ;

MESSAGE "Indexar Somente Pedidos do MÃªs "

SEPARATOR

MENUITEM ( "Indexar Somente ProduÃ§Ã£o " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(16) ) ) ;

MESSAGE "Indexar Somente ProduÃ§Ã£o "

SEPARATOR

MENUITEM ( "Indexar Somente Retiradas " ) ;

RESOURCE "MORGANIZA" ;

ACTION( ( Click(), REINDEXA(17) ) ) ;

MESSAGE "Indexar Somente Retiradas "

ENDMENU

Return oMenu

id=code>id=code>

JoÃ£o Santos - SÃ£o Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Skype: fw_kapiaba

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Luiz Fernando · September 28, 2009

citaÃ§Ã£o:
Ola pessoal.

Como eu faÃ§o para colocar um action num menu que tenha submenus.

Eu coloqueo no Action mas sempre clico com o mouse ou

teclo enter ele abre o submenu.

Alguem sabe se isto Ã© possivel?

e como fazer?

NÃ£o perca mais tempo desenvolvendo Layouts.

Somente configure.

http://www.fivewin.com.br/exibedicas.asp?id=759

Marcelo Michels

celo.michels@hotmail.com

marcelo@lorenzi.com.br

Lorenzi SoluÃ§Ãµes TÃªxteis

xH 0.99.2,0.99.71+ Fw24,Fw28 + WS

id=quote>id=quote>

Ola colega vc conseguiu algo para resolver isto...

Obrigado

Luiz Fernando

msn: empresoft@globo.com

skype:empresoft

empresoft@globo.com

FWH 8.04,XHARBOUR 1.1,PELES,XDEV,VLIB,ADS 8.1

vagner · September 29, 2009

OlÃ¡ Marcelo,

Isso Ã© do PrÃ³prio Windows, nÃ£o funciona de outro jeito, se vc possui um menu com sub-menu, o action do menu, irÃ¡ executar os sub-menus

Vagner Wirts

"Ele nÃ£o sabendo que era impossÃvel, foi lÃ¡ e fez"

VI Encontro estÃ¡ chegando , nÃ£o perca

Action em menu com submenu

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation