rigth click on drawing navigator

prodriguezdlt · Post by **prodriguezdlt** » 21 Apr 2008, 08:12

Hi, ive tried some code's to achive an event when right clicking on the Cad image, but i just cant get it to work .
I tried on DrawingNavigator.OnMouseDown := clickenmapa;

procedure TForm1.clickenmapa(Sender: TObject;Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if Button = mbLeft then showmessage('Left Button');
if Button = mbRight then showmessage('Right Button');
end;

It only works the right button, but no succes on the left.....any idea why?
I've also set MouseDragging to false, cause i thought maybe that'll be te problem but still no succes....
Thanks
Pavel

prodriguezdlt · Post by **prodriguezdlt** » 24 Apr 2008, 01:39

Still couldnt find my self with a way to make this....but ive "solved" by seting an empty popopupmenu component to the popupmenu property of tsgDrawindNavigator, an using the OnContextPopup Event!

Btw Sergey....Is everything allright? cause ive notice that u arent anwsering questions???
Are u okay?
My best wishes!
Pavel.

Post by **support** » 28 Apr 2008, 11:00

Hi Pavel,

Please accept our apologies for the silence and thank you for the concern.
We tested your code and got it working. We have sent you a simple demo with an example.

Sergey.

CADSoftTools