🚀 go-pugleaf

Bill Cummings wrote:
> 
> Actually, VCR.CC is made up of a rectange and  pushbutton1 thru 6 and
> they all have to stay together. The Inspector only shows vcrbuttons1
> which is the whole enchilada.
> Bill

Bill;

The inspector only shows vcrbuttons1, but SET CONTROL ORDER shows it and
pushbuttons 1 thru 6 -- which can be moved. I created a sample form to
demo the problem I am having.

** END HEADER -- do not remove this line*
* Generated on 10/24/97
*
parameter bModal
local f
f = new vcrtestFORM()
if (bModal)
   f.mdi = .F. && ensure not MDI
   f.ReadModal()
else
   f.Open()
endif
CLASS vcrtestFORM OF FORM
   Set Procedure To VCR_DMS.CC additive
   this.Left = 26.5
   this.Top = 3.9404
   this.Text = "Form"
   this.Height = 11.6465
   this.Width = 50.833

   DEFINE PUSHBUTTON CHANGE_COLOR_BUTTON OF THIS;
       PROPERTY; 
         Left 9.165,;
         FontBold .F.,;
         Top 2.8809,;
         Text "C&hange Color",;
         Height 1.6475,;
         Width 20.5,;
         OnClick CLASS::CHANGE_COLOR_BUTTON_ONCLICK,;
         Default .T.,;
         Group .T.

   DEFINE VCRBUTTONS VCRBUTTONS1 OF THIS;
       PROPERTY; 
         Border .F.,;
         Left 8.5,;
         Top 5.6465,;
         Height 1.2764,;
         Width 39.2012

   DEFINE PUSHBUTTON CLOSEBUTTON OF THIS;
       PROPERTY; 
         Left 9.665,;
         FontBold .F.,;
         Top 8.1172,;
         Text "&Close Form",;
         Height 1.7061,;
         Width 19,;
         OnClick {;form.close()},;
         Group .T.

   Procedure change_color_BUTTON_OnClick
      if this.parent.colornormal="G"
         this.parent.colornormal="btnface"
      else
         this.parent.colornormal="G"
      endif
   
ENDCLASS


As seen above, vcrbuttons1 is between the other two buttons, but if you
inspect the form and select SET CONTROL ORDER you will see that the 6
pushbuttons are at the end of the control order. Move them to between
the CHANGE_COLOR and CLOSE buttons, close the form, and re-open it and
vDB has moved them back to the end of the control order.

Any ideas??

Charles...