View previous topic :: View next topic |
Author |
Message |
jfudickar
Joined: 12 Jun 2006 Posts: 38 Location: Eschborn, Germany
|
Posted: Mon Oct 16, 2006 10:26 pm Post subject: OnMouseDown not working for right button |
|
|
Hi,
did you know any reason why this event is only fired when the left mouse button is pressed, and not when the right button is pressed?
Code: | procedure TQueryForm.MainEditMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: integer);
begin
if Button = mbRight then
MainOraToolForm.ShowEditorPopupMenu(PopupMenu);
end;
|
Greetings and thanks
Jens |
|
Back to top |
|
|
econtrol Site Admin
Joined: 09 Jun 2006 Posts: 202
|
Posted: Tue Oct 17, 2006 4:56 am Post subject: |
|
|
Set
TSyntaxMemo.DefaultPopup := False;
Michael. |
|
Back to top |
|
|
jfudickar
Joined: 12 Jun 2006 Posts: 38 Location: Eschborn, Germany
|
Posted: Tue Oct 17, 2006 5:43 am Post subject: |
|
|
Thanks |
|
Back to top |
|
|
|