>>>Hi All,
>>>
>>>Is there a way to change the mouse icon when passing over the column header in a grid?
>>>
>>>I have a grid that orders its table by the field in that column when the header is clicked and I would like to have the mouse change to an icon that shows this is a column that can be ordered.
>>>
>>>I assume something can be done with MouseEnter and MouseLeave but the header itself does not have a MousePointer property and changing the Grids MousePointer does not work.
>>>
>>>TIA,
>>>
>>>Ken
>>
>>Ken, when you create a thread, imposes the version of VFP.
>
>Sorry Fabio, I forgot to mention: VFP 8.0

This is fixed on VFP9.

before:

* header mouseEnter
LPARAMETERS nButton, nShift, nXCoord, nYCoord
this.AddProperty("gridPointer",THIS.parent.parent.MousePointer)
* THIS.parent.parent.MousePointer= 2

* header mouseMove
LPARAMETERS nButton, nShift, nXCoord, nYCoord
THIS.parent.parent.MousePointer= 2
 && add a header MousePointer property
* THIS.parent.parent.MousePointer= this.MousePointer

* header mouseLeave
* attention! MouseLeave is not deterministic
LPARAMETERS nButton, nShift, nXCoord, nYCoord
THIS.parent.parent.MousePointer= this.gridPointer