Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid: Make vertical scrool bar just when needed?
Message
De
16/03/2010 18:32:22
Mike Yearwood
Toronto, Ontario, Canada
 
 
À
15/03/2010 11:02:47
Metin Emre
Ozcom Bilgisayar Ltd.
Istanbul, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
01454542
Message ID:
01454977
Vues:
172
This message has been marked as the solution to the initial question of the thread.
>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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform