Mike Yearwood
Toronto, Ontario, Canada
Information générale
Catégorie:
Gestionnaire d'écran & Écrans
>>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
Worked perfect without getting any error or bug. thanks... :)
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement