Page 1 of 1

rigth click on drawing navigator

Posted: 21 Apr 2008, 08:12
by prodriguezdlt
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

Re: rigth click on drawing navigator

Posted: 24 Apr 2008, 01:39
by prodriguezdlt
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.

Re: rigth click on drawing navigator

Posted: 28 Apr 2008, 11:00
by support
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.