Thank you very much Cetin! I have learnt so much from you in these days :)

Just one thing, please call me Jimi instead of Jimmy, heh :P

best regards,
Jimi


>Hi Jimmy,
>Then it's easier :) Just change column 4th text1 with your class:) ie :
>

>procedure init
>  with this
>    .recordsource="Booking"
>    with .Columns(4)
>       .NewObject('myText','myText')
>       .myText.Visible = .t.
>       .CurrentControl = 'myText'
>       .Sparse = .f.
>   endwith
>*...
>endproc
>*...
>enddefine
>
>define class myTextBox as TextBox
> BorderStyle = 0
> procedure RightClick
>  do mymenu.mpr with this
> endproc
>enddefine
>
>*mymenu.mpr
>lparameters oTarget
>DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
>DEFINE BAR 1 OF shortcut PROMPT "Add hello"
>ON SELECTION BAR 1 OF shortcut oTarget.Value = trim(oTarget.Value)+'hello'
>ACTIVATE POPUP shortcut
>

If this doesn't work I can send a full sample later.
>Cetin
>
>
>>Hi Cetin,
>>
>>This is the problem, since I'm making the grid with code only, I can't double click on an object to add event codes, in my grid I just do something like:
>>

>>procedure init
>>  with this
>>    .recordsource="Booking"
>>    .column1.width=100
>>    .column2.width=90
>>    .column3.width=90
>>    .column4.width=115
>>
>>    .column1.controlsource="A"
>>    .column2.controlsource="B"
>>    .column3.controlsource="C"
>>    .column4.controlsource="D"
>>
>>    .column1.header.caption="A"
>>    blah blah blah...
>>

>>
>>In this case how should I add the event code to column4's cells? I wish you'll have time to teach me in a bit more details, thank you very much!!
>>
>>Jimi
>>
>>
>>
>>>>Hello everyone,
>>>>
>>>>I have programmatically generated a grid, also a shortcut menu MyMenu.mpr
>>>>
>>>>But I dunno how to set, such that only when I right click on the 4th column would activate the menu, and do something on the active cell. I actually dunno where to put the "do MyMenu.mpr" code, someone help please?
>>>>
>>>>Jimi
>>>
>>>Jimi,
>>>In 4th column currentcontrol (possibly dfefault text1) rightclick :
>>>
>>>do mymenu.mpr with this && If it's waiting an object parameter
>>>Cetin