Como criar um MENU POPUP?

[O Arquiteto 0]

Bom dia amigos! A pergunta é bem simples, como faço para criar um menu popup no Delphi, por exemplo quero por um botão no form, e quando clicar neste botão apareça um menu popup, mas o menu tem que aparecer ao lado do botão, qual é o código que devo criar?Abraço,

[Dopi 0]

Insira um componente PopUpMenu no Form...

 

No OnClick do botão escreva:

 

 with Button1 do     PopupMenu1.Popup( ClientOrigin.X, ClientOrigin.Y + ClientHeight + 1 );

isso fara o PopUpMenu aparecer logo abaixo do Botão...

[O Arquiteto 0]

Muito obrigado Daniel, valeu amigo!

 

Abraço e feliz 2005! http://forum.imasters.com.br/public/style_emoticons/default/clap.gif