DOCUMENT:Q256857  11-JAN-2001  [vbwin]
TITLE   :BUG: Toolbar with Placeholder Button Does Not Wrap Correctly
PRODUCT :Microsoft Visual Basic for Windows
PROD/VER:WINDOWS:5.0,6.0
OPER/SYS:
KEYWORDS:kbCmnCtrls kbCtrl kbToolbar kbVBp kbVBp500bug kbVBp600bug kbGrpDSVB kbDSupport

======================================================================
-------------------------------------------------------------------------------
The information in this article applies to:

 - Microsoft Visual Basic Learning Edition for Windows, versions 5.0, 6.0 
 - Microsoft Visual Basic Professional Edition for Windows, versions 5.0, 6.0 
 - Microsoft Visual Basic Enterprise Edition for Windows, versions 5.0, 6.0 
-------------------------------------------------------------------------------

SYMPTOMS
========

When a form contains a Toolbar control with several buttons and several
placeholders and the Wrappable property is set to True, when the form is resized
to a smaller size, the Toolbar wraps to the next line.

The placeholder buttons on the Toolbar wrap when the edge of the form starts to
overlap the first non-placeholder button immediately to the right of the
placeholder. However, the buttons to the right of the placeholder wrap
incorrectly. They are wrapped onto two lines instead of one and are only
partially visible. The Toolbar corrects itself when the first non-placeholder
button to the left of the placeholder wraps to the next line.

RESOLUTION
==========

A workaround is to place a dummy placeholder before and after the desired
placeholder. However, if several placeholders are side-by-side in a row, this
workaround does not resolve the issue because the placeholders act as one unit
and wrap together when the form overlaps the left-most placeholder. In this
situation, the controls used in conjunction with the placeholders of the Toolbar
must be wrapped programmatically.

STATUS
======

Microsoft has confirmed that this is a bug in the Microsoft products that are
listed at the beginning of this article.

MORE INFORMATION
================

Steps to Reproduce Behavior
---------------------------

1. Open a new Visual Basic Standard EXE project. Form1 is created by default.

2. On the Project menu, click Components. In the Components dialog box, click to
   select the Microsoft Windows Common Controls 6.0, and then click OK.

3. Add a CommandButton, a TextBox, and a Toolbar control to Form1.

4. Add the following code to the General Declarations section of Form1:

   Option Explicit

   Private Sub Command1_Click()
      Toolbar1.Buttons.Add 2, "Ref1", , tbrPlaceholder
      Toolbar1.Buttons.Add 4, "Ref2", , tbrPlaceholder
      Text1.Top = Toolbar1.Buttons("Reference").Top + _
                 (Toolbar1.ButtonHeight - Text1.Height) / 2
      Text1.Left = Toolbar1.Buttons("Reference").Left
   End Sub

   Private Sub Form_Load()
      Toolbar1.Wrappable = True
      
      Toolbar1.Buttons.Add , "Button1", "Button1", tbrDefault
      ' Add a placeholder
      Toolbar1.Buttons.Add , "Reference", , tbrPlaceholder
      Toolbar1.Buttons("Reference").Width = Text1.Width
      Toolbar1.Buttons.Add , "Button2", "Button3", tbrDefault
   End Sub

   Private Sub Form_Resize()
      ' set text boxes to placeholder positions
      Text1.Top = Toolbar1.Buttons("Reference").Top + _
                 (Toolbar1.ButtonHeight - Text1.Height) / 2
      Text1.Left = Toolbar1.Buttons("Reference").Left
   End Sub

5. Run the project. Resize the form by clicking the mouse on the lower-right
   corner of the form and dragging it to the left until the Toolbar must wrap.
   The visual problem becomes readily apparent.

6. Click Command1 and repeat the previous step. Note that the problem no longer
   occurs.

REFERENCES
==========

For additional information on Toolbar wrapping problems, click the article
number below to view the article in the Microsoft Knowledge Base:

   Q175533 BUG: Toolbar Does Not Wrap Correctly

Additional query words:

======================================================================
Keywords          : kbCmnCtrls kbCtrl kbToolbar kbVBp kbVBp500bug kbVBp600bug kbGrpDSVB kbDSupport 
Technology        : kbVBSearch kbAudDeveloper kbZNotKeyword6 kbZNotKeyword2 kbVB500Search kbVB600Search kbVBA500 kbVBA600 kbVB500 kbVB600
Version           : WINDOWS:5.0,6.0
Issue type        : kbbug
Solution Type     : kbpending

=============================================================================

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS
PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND.  MICROSOFT DISCLAIMS
ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES
OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  IN NO
EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR
ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL,
CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF
MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.  SOME STATES DO NOT ALLOW THE EXCLUSION
OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES
SO THE FOREGOING LIMITATION MAY NOT APPLY.

Copyright Microsoft Corporation 2001.