FIX: System Menu Appears When MouseDown Event Invokes a Drag

• Microsoft Visual Basic Learning, Professional, and Enterprise Editions for Windows, version 5.0

SYMPTOMS

When the MouseDown event of a FileListBox control invokes a Drag method on a right click, the system menu for the Form appears.

CAUSE

This problem will only occur with certain combinations of the FileListBox's location and the display setting for the Font.

STATUS

Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. This bug has been fixed in Visual Studio 97 Service Pack 2.

For more information on the Visual Studio 97 Service Pack 2, please see the following article in the Microsoft Knowledge Base:

   ARTICLE-ID: Q170365
   TITLE     : INFO: Visual Studio 97 Service Packs - What, Where, and Why

   ARTICLE-ID: Q171554
   TITLE     : INFO: Visual Basic 5.0 Fixes in Visual Studio 97
               Service Pack 2

MORE INFORMATION

Steps to Reproduce Behavior

1. To set your font to "Large Fonts," right-click the desktop.

2. Select "Properties."

3. Click the "Settings" tab.

4. In the "Font Size" combobox, select "Large Fonts."

5. Click "OK." (This may require that you reboot your system.)

6. Open a new "Standard EXE" project.

7. Add a FileListBox control (File1) to Form1.

8. Set the following properties for File1:

         Property       Value
         --------       -----
         Left           2520
         Top            1080
   
   

9. Add the following code to the MouseDown event of File1:

         If Button = 2 Then File1.Drag vbBeginDrag
   

10. Press the F5 key to run the application.

11. Right-click File1. Note that the system menu of Form1 appears.