Mike Yearwood
Toronto, Ontario, Canada
General information
Category:
Forms & Form designer
>Hi All,
>
>Is there any way to make vertical scrool bar visible when just it needed (I mean there should be much record more than visible at first glance of grid)?
Hi Metin
For some people you have to ask clearly. ;)
Not tested. Had to do something like this recently.
local lnDataRows, lnDisplayRows
store 0 to lnDataRows,lnDisplayrows
select count(*) from (this.recordsource) into array laCount
if _Tally#0
lnDataRows = laCount[1]
endif
lnDisplayRows = (this.height - iif(inlist(this.scrollbars,1,3),sysmetric(8),0) - this.headerheight) / this.rowheight
if lnDataRows > lnDisplayRows
if inlist(this.scrollbars,0,1)
this.scrollbars = this.scrollbars + 2
endif
else
if inlist(this.scrollbars,3,2)
this.scrollbars = this.scrollbars - 2
endif
endif
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only