Passar parâmetro em Action Main Menu

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

Softwhouse
Usuário Nível 3
Usuário Nível 3
Mensagens: 324
Registrado em: 07 Dez 2011 18:44
Localização: Porto Alegre/RS

Passar parâmetro em Action Main Menu

Mensagem por Softwhouse »

Preciso passar um parâmetro no Action do Main Menu e não estou conseguindo.

Exemplo:

Define Main Menu

PopUp 'Clientes'

Item 'Clientes' Action {||Cadastros('01')}

End PopUp



Function Cadastros(cParamatro)
MsgInfo(cParametro)


Estou fazendo alguma coisa errada ou não funciona mesmo?
Fernando
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

Passar parâmetro em Action Main Menu

Mensagem por Toledo »

Fernando, segui o seu exemplo e funcionou certinho, segue em anexo o demo que testei.
Softwhouse escreveu:Function Cadastros(cParamatro)
MsgInfo(cParametro)
No seu exemplo tinha um erro, mas acho que deve ser de digitação.

Atenção: o demo em anexo testei com MiniGui Extended, mas basta trocar #include "MiniGUI.ch" por #include "hmg.ch" para compilar com a HMG.

Abraços,
Anexos
mainmenu.zip
(639.97 KiB) Baixado 56 vezes
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Softwhouse
Usuário Nível 3
Usuário Nível 3
Mensagens: 324
Registrado em: 07 Dez 2011 18:44
Localização: Porto Alegre/RS

Passar parâmetro em Action Main Menu

Mensagem por Softwhouse »

Obrigado Toledo, consegui fazer funcionar, revisei o código e encontrei o erro.
Fernando
Responder