如何在MDI字窗体中使用COMMANDBARS和TABCONTROL,我写得过程无法实现,但是如果不是MID字窗体,就是可以得,求救啊。

解决方案 »

  1.   

    private void Form2_Load(object sender, System.EventArgs e)
    {
    XtremeCommandBars.CommandBar ToolBar;
    XtremeCommandBars.CommandBarControl aControl;

    XtremeCommandBars.CommandBarControls aControls; ToolBar = CommandBars.Add("Standard", XtremeCommandBars.XTPBarPosition.xtpBarTop);
    aControls = ToolBar.Controls;
            
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 100, "", -1, false);
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 101, "", -1, false);
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 102, "", -1, false);
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 103, "", -1, false);
    aControl.BeginGroup = true;
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 104, "", -1, false);
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 105, "", -1, false);
    aControl.BeginGroup = true;
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 106, "", -1, false);
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 107, "", -1, false);
    aControl.BeginGroup = true;
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 108, "", -1, false);
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 109, "", -1, false);
    aControl = aControls.Add(XtremeCommandBars.XTPControlType.xtpControlButton, 110, "", -1, false);
    aControl.BeginGroup = true;
    ToolBar.EnableDocking(XtremeCommandBars.XTPToolBarFlags.xtpFlagHideWrap);
    ToolBar.Closeable = false; 
    ToolBar.SetIconSize(44,25);
    CommandBars.Icons = ImageManager.Icons;
    CommandBars.ActiveMenuBar.Visible = false;
    CommandBars.Options.ShowExpandButtonAlways = false; XtremeSuiteControls.TabControlItem Item;
    panel1.Parent = TabControl;
    Item = TabControl.InsertItem(0 , "页面1", panel1.Handle.ToInt32(), 300); panel2.Parent = TabControl;
    Item = TabControl.InsertItem(1 , "页面2", panel2.Handle.ToInt32(), 300); groupBox2.Parent = TabControl;
    Item = TabControl.InsertItem(2 , "页面3", groupBox2.Handle.ToInt32(), 300); TabControl.Icons = (XtremeSuiteControls.ImageManagerIcons)axImgTab.Icons;
    TabControl.PaintManager.ShowIcons = true; 
    TabControl.PaintManager.Appearance = XtremeSuiteControls.XTPTabAppearanceStyle.xtpTabAppearancePropertyPage;
    TabControl.PaintManager.Color = XtremeSuiteControls.XTPTabColorStyle.xtpTabColorOffice2003;
    }
      

  2.   

    我用过...不过是在VB中实现的,做法是:
    1>在MDI Form中放置一Picture,Picture的Visible属性为False,然后将TABCONTROL置入Picture
    2>使用Commandbars对象的AdDialogBar方法添加一个可停靠框,并将TABCONTROL挂为子件,如:
     Set DialogBar = CommandBars1.AddDialogBar("导航栏", xtpBarLeft)
        With DialogBar
            .Closeable = False
            '.EnableDocking xtpFlagFloating
            .SetSize 200, 300
            .ChildHandle = picGuide.hWnd 'wndToolbox.hWnd  '在此处挂
        End Wit希望对你有所借鉴..