Thanks guys.

I hadn't even noticed that event...

I owe you both a beer. When are you in Switzerland next? :)

Mace


>Hi Macer,
>
>>>>>>>Hi all
>>>>>>>How can I add rightclick menu (I have a grid and I want to add rightclick menu for each cell).
>>>>>>
>>>>>>if you want to have one rightclick menu for all cells, then place the transparent shape over grid and use rightclick event
>>>>>>of Shape to define popup menu and for processing of user choice.
>>>>>
>>>>>That way you make grid readonly :o) No way to click on it.
>>>>
>>>>And disable the scroll event... my users are giving me hell for this...
>>>
>>>it can be easily emulated with shape. at least, we do it in our app many many times ;)
>>
>>OK spill the beans... how do you make the grid scroll ( from the mouse's scroll button) when a shape is on top of the grid?
>>
>>If you tell me a good solution I'll send you a beer voucher.
>>
>>Mace
>
>Shape Mousewheel
>
>LPARAMETERS nDirection, nShift, nXCoord, nYCoord
>
>*!* wait window str(ndirection) nowait
>if !thisform.rlIngrid
> thisform.conMore.Grid.setfocus()
> thisform.rlIngrid=.t.
>endif
>thisform.conMore.Grid.Doscroll(iif(nDirection<0,3,2))
>
>works like sharm ;)