Dúvida TMainmenu
Bom dia pessoal
seguinte, estou precisando pegar o tag do meu componente mainmenu selecionado mais ou menos assim:
MainMenu no form1
- Cliente
-- Cliente
-- Setor
- Imprimir
ao selecionar o item Cliente ele irá abrir um novo form2 preciso saber qual o tag do item do mainmenu que foi selecionado para abrir
se alguém puder ajudar..agradeco desde ja
seguinte, estou precisando pegar o tag do meu componente mainmenu selecionado mais ou menos assim:
MainMenu no form1
- Cliente
-- Cliente
-- Setor
- Imprimir
ao selecionar o item Cliente ele irá abrir um novo form2 preciso saber qual o tag do item do mainmenu que foi selecionado para abrir
se alguém puder ajudar..agradeco desde ja
Ricardo Matarazzo
Curtidas 0
Respostas
Daniel Santos
05/03/2013
E simples
Quando voce clica no item voce tem que implementar uma função do tipo
procedure TForm4.Item21Click(Sender: TObject);
O parametro Sender no delphi como padrão é o Objeto que chamou a requisicao
Entao se voce usar
TMenuItem(Sender).tag resolve o seu problema
Com isso voce pode pegar nao so o tag, mais qualquer outro parametro, como caption por exemplo.
Quando voce clica no item voce tem que implementar uma função do tipo
procedure TForm4.Item21Click(Sender: TObject);
O parametro Sender no delphi como padrão é o Objeto que chamou a requisicao
Entao se voce usar
TMenuItem(Sender).tag resolve o seu problema
Com isso voce pode pegar nao so o tag, mais qualquer outro parametro, como caption por exemplo.
GOSTEI 0