插入标准控件
菜单可以插入标准控件,例如下图中选择字体名称和字体大小的两个下拉列表框就是标准控件来的:
我们没有办法直接在菜单设计器中插入标准控件,只能通过代码,以上图的例子为例,步骤:
1、在窗口中插入一个FontPicker控件,名称为FontPicker1,设置好相关属性和事件。
2、在窗口中插入一个ComboBox控件,名称为ComboBox1,设置好相关属性和事件。
3、在窗口的AfterLoad事件中加上代码:
e.Form.Strips("工具栏2").Items.InsertControl("FontName",e.Form.Controls("FontPicker1"),0)
e.Form.Strips("工具栏2").Items.InsertControl("FontSize",e.Form.Controls("Combobox1"),1)
这里假定工具栏的名称为"工具栏2"。
InsertControl的语法:
InsertControl(ItemName,Control,Index)
ItemName:项目名称,控件是作为一个特殊项目插入到菜单中的,所以要指定项目名称。
Control: 要插入的控件。
Index: 插入位置。