Xailer & OZ Software

Hi!
I tried to override standard RichEdit context menu and found that in the
code
METHOD RichEdit1ContextMenu( oSender, nPosX, nPosY ) CLASS TForm1
::ShowPopupMenu(::oPopupMenu1, nPosX, nPosY)
RETURN 1
when this event are triggered with mouse right button, nPosX and nPosY are
always equal to NIL.
If I use RichEdit1RButtonDown instead, nPosX and nPosY are OK (equal to
mouse position).
Please test it.
Thank you. Oleg.

Oleg,
> I tried to override standard RichEdit context menu and found that in the
> code
>
> METHOD RichEdit1ContextMenu( oSender, nPosX, nPosY ) CLASS TForm1
> ::ShowPopupMenu(::oPopupMenu1, nPosX, nPosY)
> RETURN 1
>
> when this event are triggered with mouse right button, nPosX and nPosY are
> always equal to NIL.
>
> If I use RichEdit1RButtonDown instead, nPosX and nPosY are OK (equal to
> mouse position).
> Please test it.
Fixed. Thanks for the info.
The problem is that RE was using a different approach to show a contextmenu.
That is, it was expecting to the event to return a menu popup handle, not
that the event shows the menu itself. Now it's fixed to act exactly as the
documented TControl behavior.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

Oleg,
> I tried to override standard RichEdit context menu and found that in the
> code
>
> METHOD RichEdit1ContextMenu( oSender, nPosX, nPosY ) CLASS TForm1
> ::ShowPopupMenu(::oPopupMenu1, nPosX, nPosY)
> RETURN 1
>
> when this event are triggered with mouse right button, nPosX and nPosY are
> always equal to NIL.
>
> If I use RichEdit1RButtonDown instead, nPosX and nPosY are OK (equal to
> mouse position).
> Please test it.
Fixed. Thanks for the info.
The problem is that RE was using a different approach to show a contextmenu.
That is, it was expecting to the event to return a menu popup handle, not
that the event shows the menu itself. Now it's fixed to act exactly as the
documented TControl behavior.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

Oleg,
> Thanks for your support. When will you release the version with all these
> fixes?
I'm trying to fix another richedit bug; well, in fact, there is a windows
bug that I'm trying to workaround. I'll send it to you when fixed.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

Oleg,
> Thanks for your support. When will you release the version with all these
> fixes?
I'm trying to fix another richedit bug; well, in fact, there is a windows
bug that I'm trying to workaround. I'll send it to you when fixed.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

Jose,
> Fixed. Thanks for the info.
Thanks for your support. When will you release the version with all these
fixes?
Regards, Oleg.

Jose,
> Fixed. Thanks for the info.
Thanks for your support. When will you release the version with all these
fixes?
Regards, Oleg.