Bot�o com menu?

Question

boa tarde a todos, galera, precizo fazer um menu simples, tipo, quero que de um botao, ai clicar nele surge um menuzinho pequeno com 3 ou 4 op��es, para baixo, algo simples, mas n�o tenho a menor id�ia de como fazer isso, alguem sabe algum componente que faz isso?

Anderson

Marco Salles · Accepted Answer

ja que o Site n�o permite a edi��o ... tenho que mandar outro post para corrigit uma pequena falha no t�pico anterior ...amigo andersonscinfo , o delphi ja d� suporte a isto , basicamente sem nenhum e...

Cyborg* · Answer

voc� come�ou a programar a quanto tempo ?� s� abrir o component mainmenu da paleta standard...

Marco Salles · Answer

amigo andersonscinfo , o delphi ja d� suporte a isto , basicamente sem nenhum esfor�o adicional

Insira um componente TPopupMenu ( 3 Componente da paleta Stardant)

De um Click com o Bot�o direito neste Componente e escolha a Op��o
Menu Designer

Crie Quanto items de Menu que desejar .. e tb defina o evento onclick dos mesmos

Por ultimo no Objecto Inspectos na guia em Events do Coponente Button selecione Popup Menu e defina o PopupMenu1 ( que fora criado )

Agora Rode a Aplica��o e perceba que ao clicar com O bot�o Direiro , aparece Logo abaixo do Bot�o o Popup definido anteriormente..

� recomend�vel n�o usar o Bot�o direito para isto , deixando o mesmo direito para manipular outros eventos disponiv�is .

Andersonscinfo · Answer

obrigado a todos...Marco Salles, eu fiz desta forma, mas queria deixar o esquero para fazer isto neste bot�o, mas tudo bem, vou deixar o direito mesmo, muito obrigado pela anten��o....Anderson Junior...

Marco Salles · Answer

olha so ... eu estou de saida agora . Mas posso te deixar uma dica que acho que resolve

quando o Bot�o receber o Foco , altere as fun�oes do Bot�o direito pelo esuqerdo

Pesquise sobre como fazer isto .. Tem Fun�oes prontas para isto

Depois que o bot�o perder o Foco , volte com os Bot�es Originais

P:S Programe no evento on enter e On Exit do Referido Bot�o

P:S ha outra maneiras de fazer isto tb com o bot�o esuqerdo , mas como eu disse t� de saida

espero ter sido �til

Marco Salles · Answer

a ultima dica , como eu disse , estava de saida e acabei sendo infeliz

efetura esta altera��o n�o � uma boa , pq o usu�rio pode mudadr de janela , no momento que o Butt�o tenha recebido o foco . Consequencia � que os Bot�es ficar�o trocados , por tempo indeterminado .

Pensando melhor , voce pode simular o Pressionamento do Bot�o direito
ao clicar no Bot�o

Por exemplo , se voce usa Windows , pode usar a Api do Windows

procedure TForm1.Button1Click(Sender: TObject);
begin
mouse_event( MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0 );
sleep(1);
mouse_event( MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0 );
end;

Deu para entender ????

Andersonscinfo · Answer

sim, claro amigo, muito obrigado, voc� me ajudou muito....m�os a obra agora...Anderson...

F�rum Bot�o com menu? #355760