I test it and it works as you describe. Unfortunetely the problem with the unreleased objref makes it unusable
Thank You very much
Dimitris
>>In another thread i read that you can bind events to the _screen object. Can something similar be done with the browse window?? Thats for quick and dirty solutions, when you dont have the luxury to make a grid in order to manipulate the events...
>>
>>Thank You
>
>Yes you can. Ex.
>local logridmonitor
>browse name loMyGrid nowait
>logridmonitor = createobject('CusGrdMonitor')
>browse last
>return
>
>define class cusGrdMonitor as Custom
>oGrid = loMyGrid
>
>procedure Destroy
>THIS.oGrid = .NULL.
>endproc
>
>procedure oGrid.Column1.Resize
> wait window transform(THIS.Width)
>endproc
>
>procedure oGrid.AfterRowColChange
>lparameters nColIndex
> wait window transform(nColIndex)
>endproc
>enddefine
>
>There is a problem with this code. It leaves an object reference somewhere to the Grid object specified in the Name clause and the Browse window remains displayed. It isn't active and you can't make it active. If you issue a CLEAR ALL, it releases it. This may have something to do with the unreleased object reference in an Assign method bug reported here a month or so ago.
>
>Because of this, I would recommend going along with Vlad's suggestion of actually using a Grid.
>
>HTH.