Microsoft KB Archive/167674

= BUG: DEFINE WINDOW Command Loses Single Border in VFP 5.0 =

Article ID: 167674

Article Last Modified on 10/16/2002

-

APPLIES TO


 * Microsoft Visual FoxPro 5.0 Standard Edition
 * Microsoft Visual FoxPro 5.0a
 * Microsoft Visual FoxPro 6.0 Professional Edition

-



This article was previously published under Q167674



SYMPTOMS
Using the Font clause on the DEFINE WINDOW command under Visual FoxPro 5.0 and higher causes the resulting window to appear with a double border. In FoxPro 2.6a for Windows and Visual FoxPro 3.0b, the window has a single pixel border.



RESOLUTION
To preserve the single border window, do not use the FONT clause with the DEFINE WINDOW command in Visual FoxPro 5.0 or higher.



STATUS
Microsoft has confirmed this to be a problem in the Microsoft products listed at the beginning of this article.



MORE INFORMATION
Identical DEFINE WINDOW commands create windows that differ in appearance when run under Visual FoxPro 5.0 and higher compared with FoxPro for Windows 2.6a and Visual FoxPro 3.0b. Along with the difference in border styles noted above, a close box appears in the upper right-hand corner when the code runs under Visual FoxPro 3.0b and FoxPro 2.6a for Windows. In Visual FoxPro 5.0 and higher, however, the close box is absent.

Steps to Reproduce Behavior
  In FoxPro 2.6a or Visual FoxPro 3.0b, type the following lines of code in the Command Window: DEFINE WINDOW X from 1,1 to 20, 20 Title "X" font "MS San Serif", 10 ACTIVATE WINDOW X  Note that the resulting window has a close box in the upper right-hand corner and the border is a single pixel in width. Type the same commands in the Command window of Visual FoxPro 5.0 or 5.0a. The window now has what appears to be a double border and the close box is gone.  Type CLEAR ALL in the Command window, and change the code to read: DEFINE WINDOW X from 1,1 to 20, 20 Title "X" ACTIVATE WINDOW X  The window now has a single border but the close box is still absent.</ol>

Keywords: kbbug KB167674

-

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

© Microsoft Corporation. All rights reserved.