Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
AutoHideScrollBar Issues
Message
From
07/06/2004 13:53:13
Mike Sue-Ping
Cambridge, Ontario, Canada
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Visual FoxPro Beta
Title:
AutoHideScrollBar Issues
Miscellaneous
Thread ID:
00910823
Message ID:
00910823
Views:
68
The VFP team put a new property called AutoHideScrollBar into the list control. It can automatically hide the scrollbar if the full list is displayed (and thus, no scrolling is required). Unfortunately they didn't put it anywhere else like in the combobox, editbox or grid. Why only the listbox? Why did they stop short? Please tell me it's only a Beta version and they're going to "bake the VFP pie completely".

Another "issue" with it is the following code from the help example. See my inline comment.
CLEAR
DIMENSION gaMyListArray(10)
FOR gnCount = 1 to 10  
   STORE REPLICATE(CHR(gnCount+64),6) TO gaMyListArray(gnCount)
NEXT   

frmMyForm = CREATEOBJECT('Form')  
frmMyForm.AddObject('cmbCommand1','cmdMyCmdBtn')  
frmMyForm.AddObject('lstListBox1','lstMyListBox')  
frmMyForm.lstListBox1.RowSourceType = 5  
frmMyForm.lstListBox1.RowSource = 'gaMyListArray' 
frmMyForm.cmbCommand1.Visible =.T.  
frmMyForm.lstListBox1.Visible =.T.  
frmMyForm.Show 
READ EVENTS  

DEFINE CLASS cmdMyCmdBtn AS CommandButton  
   Caption = '\<Quit'  
   Cancel = .T.  
   Left = 125  
   Top = 210  
   Height = 25  
   PROCEDURE Click
      CLEAR EVENTS  
      CLEAR  
ENDDEFINE

DEFINE CLASS lstMyListBox AS ListBox  
   Left = 10  
   Top = 30  
AutoHideScrollBar = 2   && Change this to 1 and there is no difference!!!!!
ENDDEFINE
Next
Reply
Map
View

Click here to load this message in the networking platform