I was just thinking about that as I red your message.
It was the only thing i did not test. I looked at fonts size and i remember it is set to large fonts on that PC but i can't remember how it is set on other.
I'll let you know on Monday.
thank you all
Alessio
>Alessio,
>
>I have NOT read the whole thread BUT your statement of 'on one PC only' makes me suggest that you might want to look at the Display setting for "Small Fonts" / "Large Fonts" on THAT PC.
>
>You find this in: rt-click anywhere on Desktop, click Properties, click Advanced and then look at the selection in place. It may be set to Large Fonts" and that can cause different display from "Small Fonts".
>
>Sadly, even in WinXP (Home) a display still shows differently depending on this setting.
>
>good luck
>
>
>>Thank u for the explanation, u add something i didn't kow to my knowledge.
>>I suppose it was sometyhing with the minimum height of the grid, bu what did,'t and still does not make sense to me is the fact that the problems comes out only on one PC of the network. How do you explai it ?
>>thanks
>>Alessio
>>>>It looks like it was my lucky month !!!
>>>>To allow users to choose multiple filters on a table, i put a grid on a form.
>>>>clicking on a command button i minimize it to the headerheight value
>>>>
>>>>.mygrid.height = .mygrid.headerheight + 1
>>>>
>>>>clicking on its header i maximize it
>>>>
>>>>.height = heightval
>>>>
>>>>It works fine, or better it works perfectly on all PC but one.
>>>>On this bloody one it gives me the error that the object miagrid has evaluated an illegal value. This doesn't make sense to me.
>>>>
>>>>Alessio
>>>>
>>>>PS Thank you all once again
>>>
>>>Alessio,
>>>
>>>I suspect you have trouble with the minimum height of the grid
>>>>.mygrid.height = .mygrid.MinimumHeight()
>>>
>>>The minimum height for a grid is as follows (add a method to your grid class)
>>>
>>>
>>>
>>>return ( this.HeaderHeight ;
>>> + this.GridLineWidth ;
>>> + iif( inlist(this.ScrollBars,SCROLLBARS_HORIZONTAL,SCROLLBARS_BOTH), ;
>>> sysmetric(SYSMETRIC_HSCROLLBARHEIGHT), ;
>>> 1 ;
>>> ) ;
>>> )
>>>
>>>
>>>for your info
>>>
>>>
>>>#define Grid_WIDTH_RecordMark iif(this.Recordmark, 10, 0)
>>>#define Grid_WIDTH_DeleteMark iif(this.DeleteMark, 8, 0)
>>>#define Grid_WIDTH_Scrollbar iif(inlist(this.ScrollBars,SCROLLBARS_VERTICAL,SCROLLBARS_BOTH), ;
>>> sysmetric(SYSMETRIC_VSCROLLBARWIDTH), ;
>>> 0 ;
>>> )
>>>
>>>#define MIN_WIDTH (Grid_WIDTH_RecordMark + Grid_WIDTH_DeleteMark + Grid_WIDTH_Scrollbar)
>>>
>>>return MIN_WIDTH
>>>