Microsoft KB Archive/303831

= FIX: ScrollBars on EditBox Control Do Not Display in Compiled .exe =

Article ID: 303831

Article Last Modified on 1/24/2002

-

APPLIES TO


 * Microsoft Visual FoxPro 7.0 Professional Edition

-



This article was previously published under Q303831



SYMPTOMS
Forms that contain EditBox controls do not display the vertical scrollbar when they are run in an application using the Visual FoxPro run-time libraries. Users can still scroll the EditBox control by using the keyboard.



RESOLUTION
To resolve this problem, obtain the latest service pack for Visual FoxPro for Windows 7.0. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:

316964 How to Obtain the Latest Visual FoxPro for Windows 7.0 Service Pack

The individual update is available from the following Microsoft Developer Network (MSDN) Web site:

http://msdn.microsoft.com/vfoxpro/downloads/updates.asp

This update contains new versions of the Visual FoxPro run-time libraries, as well as an updated Visual FoxPro run-time merge module (used for redistribution of custom applications). This issue only applies to the run-time versions of Visual FoxPro that ship with the English product.



STATUS
Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article. This problem was first corrected in Visual FoxPro for Windows 7.0 Service Pack 1.



MORE INFORMATION
This issue does not occur on forms that contain EditBox controls when the forms are run under the full development version of Visual FoxPro (VFP7.exe).

Steps to Reproduce Behavior
Paste the following code in a .prg file, then run the code: TEXT TO temp NOSHOW ON SHUTDOWN quit oform=CREATEOBJECT(&quot;Form1&quot;) oform.show READ events DEFINE CLASS form1 as Form ADD OBJECT edit1 as editbox WITH visible=.t.,scrollbars=2 PROCEDURE show this.Width=thisform.edit1.width this.Height=thisform.edit1.height+2 thisform.edit1.value=&quot;this is a very, very, very long string&quot; thisform.edit1.value=thisform.edit1.value+&quot; that needs scrollbars&quot; ENDDEFINE ENDTEXT =Strtofile(temp,&quot;tempprg.prg&quot;) Create Project temp Nowait _vfp.ActiveProject.Files.Add(&quot;tempprg.prg&quot;) _vfp.ActiveProject.Build(&quot;tempprg.exe&quot;,3) Run /N tempprg.exe

Additional query words: kbVFP700sp1fix

Keywords: kbbug kbfix kbcontainer kbctrl KB303831

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.