Fórum Simular ToolButton com SpeedButton ? #294297
02/09/2005
0
Gostaria de simular o DropDown com o SpeedButton,
abrir o PopupMenu com o botao esquerdo do mouse ao invés do direito
alguem sabe como fazer isso ?
abrir o PopupMenu com o botao esquerdo do mouse ao invés do direito
alguem sabe como fazer isso ?
Fabiano Góes
Curtir tópico
+ 0
Responder
Posts
02/09/2005
Fabiano Góes
E ai galera ninguem ? :cry:
apenas abrir o popupMenu do SpeedButton com o click Esquerdo do mouse ao invés do direito (que é normal)
:roll: :idea:
apenas abrir o popupMenu do SpeedButton com o click Esquerdo do mouse ao invés do direito (que é normal)
:roll: :idea:
Responder
Gostei + 0
02/09/2005
Rômulo Barros
Evento OnMouseDows do SpeedButton:
procedure TForm1.SpeedButton1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
If(Shift = [ssLeft])Then
Begin
PopupMenu1.Popup(Y,X);
End;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)