Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Grid horizontal scrollbars on demand
Message
From
28/12/2016 09:22:42
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Grid horizontal scrollbars on demand
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows 10
Network:
Windows Server 2012
Database:
MS SQL Server
Application:
Robot
Miscellaneous
Thread ID:
01646151
Message ID:
01646151
Views:
162
Hello,

I am trying to figure out to switch on horizontal scrollbars on a grid but only when the total number of columns is wider than the grid width.

Otherwise you get the empty scrollbar on the bottom of the grid and it only wastes the space.

However I have trouble figuring out if the columns total width is larger than the grid width, because the numbers don't match. The combined width of all columns is less than the grid width property. I also thought there is a fixed number of pixels per column that would need to be added, but also it does not match. Anyone has an idea how to get this to work?

The general idea is as follows:
LOCAL lnTotalWidthColumns
lnTotalWidthColumns = 0
*
FOR EACH loColumn IN THIS.Columns
    lnTotalWidthColumns = lnTotalWidthColumns + loColumn.Width
ENDFOR
*
IF THIS.Width < lnTotalWidthColumns
    THIS.Scrollbars = 3
ELSE
    THIS.Scrollbars = 2
ENDIF
Christian Isberner
Software Consultant
Next
Reply
Map
View

Click here to load this message in the networking platform