Colocar menus com aparencia do Office XP nas aplicações

[Anonymous]

Graças os novos componentes nativos no Delphi 7
podemos agora com segurança fazer tão esperado
pelos usuários: Menus com a Aparencia do Delphi 7 e
do Office XP. É isso que quero falar nesse artigo, os dois
componentes responsáveis por esse recurso e dar uma
breve explicação de como usá-los...

Os dois componentes ficam na paleta Additional do
Delphi 7 e eles são:
* ActionManager: Responsável para montar as opções
e controlar as ações atribuídas a eles.
* ActionMainMenuBar: Dá suporte as opções colocadas
no ActionManager montando menus.

Usando os Componentes:

1- Insira os dois componentes no Formulário;
vamos seguir o Exemplo que estejam com os nomes de
ActionManager1 e ActionMainMenuBar1

2- Na propriedade ActionManager do ActionMainMenuBar1
coloque o ActionManager1;

3- Na propriedade ActionBars do ActionManager1 já terá um
item que é um TActionBarItem, selecione ele e na sua propriedade
ActionBar coloque a ActionMainMenuBar1;

4- O ActionBarItem terá também a propriedade Items... é nela que
voce adiciona os Itens que ficam na Barra Principal de Menu, no meu exemplo
adicionei os itens "Cadastros" e "Relatórios";

5- Em cada desses Itens (no caso o item Cadastros e o item Relatórios)
também possuem a propriedade Items, que é onde Colocamos os
itens que será as opções do menu, no meu exemplo coloquei:

Clientes
Fornecedores
Funcionarios
-
Sair

assim ele montou o menu principal,
mas como puderam ver os menus estão desabilitados...

6- Definir as Ações dos Menus: De um duplo clique sobre o ActionManager1 e
com a tecla Insert poderá ser adicionado novas ações e cada Action terá
o Evendo OnAction, é nele que você coloca o código desejado...

no exemplo foi definido 4 Actions, 1 para cada item...

7- Atrubuir uma ação ao Item do Menu: Vá na propriedades dos itens
do menu e na propriedade Action de cada item associe o Action atribuído a
ele daí é só... seu menu já estará funcionando..

quem quizer pegar o exemplo na minha pagina pessoal, o endereço é:
http://web.onda.com.br/skatistas/action-sample.zip

é isso aí...


Créditos:Denner Bizarria Branco
flws galera esse flws e meu chapahouse xD t+

[Anonymous]

Poooooow...

Pena q o link do exemplo esteja com problema =/

Flws!
Abração!