_ Partial Class frmDemo ' Inherits System.Windows.Forms.Form Inherits COM_Kit.frmBasisTemplat 'Form 重写 Dispose,以清理组件列表。 _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Windows 窗体设计器所必需的 Private components As System.ComponentModel.IContainer '注意: 以下过程是 Windows 窗体设计器所必需的 '可以使用 Windows 窗体设计器修改它。 '不要使用代码编辑器修改它。 _ Private Sub InitializeComponent() Me.iugBasis = New iMESUltraGrid.iMESUltraGridControl() Me.iugDetail = New iMESUltraGrid.iMESUltraGridControl() Me.btnClose = New Infragistics.Win.Misc.UltraButton() Me.btnApprove = New Infragistics.Win.Misc.UltraButton() Me.btnEMail = New Infragistics.Win.Misc.UltraButton() Me.btnDCopy = New Infragistics.Win.Misc.UltraButton() Me.btnCopy = New Infragistics.Win.Misc.UltraButton() Me.btnDDel = New Infragistics.Win.Misc.UltraButton() Me.btnDEdit = New Infragistics.Win.Misc.UltraButton() Me.btnAdd = New Infragistics.Win.Misc.UltraButton() Me.btnDAdd = New Infragistics.Win.Misc.UltraButton() Me.btnDel = New Infragistics.Win.Misc.UltraButton() Me.btnEdit = New Infragistics.Win.Misc.UltraButton() Me.SuspendLayout() ' 'iugBasis ' Me.iugBasis.EnterDirection = iMESUltraGrid.iMESUltraGridControl.EnterDirectionEnum.Down Me.iugBasis.GroupBoxPromptText = "Drag a column header here to group by that column." Me.iugBasis.GroupBoxTextForeColor = System.Drawing.Color.Red Me.iugBasis.Identity = "iMES" Me.iugBasis.IdentityForm = "" Me.iugBasis.LayOutFilePath = "" Me.iugBasis.Location = New System.Drawing.Point(12, 53) Me.iugBasis.Name = "iugBasis" Me.iugBasis.PrintFitWidthToPages = 0 Me.iugBasis.PrintLandscape = True Me.iugBasis.PrintPageFooter = "" Me.iugBasis.PrintPageFooterHAlign = Infragistics.Win.HAlign.[Default] Me.iugBasis.PrintPageFooterHeight = 20 Me.iugBasis.PrintPageHeader = "" Me.iugBasis.PrintPageHeaderHAlign = Infragistics.Win.HAlign.[Default] Me.iugBasis.PrintPageHeaderHeight = 20 Me.iugBasis.PrintZoom = 1.0R Me.iugBasis.Size = New System.Drawing.Size(791, 200) Me.iugBasis.TabIndex = 41 Me.iugBasis.UserNo = "iMES" ' 'iugDetail ' Me.iugDetail.EnterDirection = iMESUltraGrid.iMESUltraGridControl.EnterDirectionEnum.Down Me.iugDetail.GroupBoxPromptText = "Drag a column header here to group by that column." Me.iugDetail.GroupBoxTextForeColor = System.Drawing.Color.Red Me.iugDetail.Identity = "iMES" Me.iugDetail.IdentityForm = "" Me.iugDetail.LayOutFilePath = "" Me.iugDetail.Location = New System.Drawing.Point(12, 260) Me.iugDetail.Name = "iugDetail" Me.iugDetail.PrintFitWidthToPages = 0 Me.iugDetail.PrintLandscape = True Me.iugDetail.PrintPageFooter = "" Me.iugDetail.PrintPageFooterHAlign = Infragistics.Win.HAlign.[Default] Me.iugDetail.PrintPageFooterHeight = 20 Me.iugDetail.PrintPageHeader = "" Me.iugDetail.PrintPageHeaderHAlign = Infragistics.Win.HAlign.[Default] Me.iugDetail.PrintPageHeaderHeight = 20 Me.iugDetail.PrintZoom = 1.0R Me.iugDetail.Size = New System.Drawing.Size(791, 291) Me.iugDetail.TabIndex = 42 Me.iugDetail.UserNo = "iMES" ' 'btnClose ' Me.btnClose.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnClose.Location = New System.Drawing.Point(827, 523) Me.btnClose.Name = "btnClose" Me.btnClose.Size = New System.Drawing.Size(88, 32) Me.btnClose.TabIndex = 48 Me.btnClose.Text = "Close (&X)" ' 'btnApprove ' Me.btnApprove.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnApprove.Location = New System.Drawing.Point(827, 213) Me.btnApprove.Name = "btnApprove" Me.btnApprove.Size = New System.Drawing.Size(88, 32) Me.btnApprove.TabIndex = 53 Me.btnApprove.Text = "Approve(&Y)" ' 'btnEMail ' Me.btnEMail.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnEMail.Location = New System.Drawing.Point(827, 429) Me.btnEMail.Name = "btnEMail" Me.btnEMail.Size = New System.Drawing.Size(88, 32) Me.btnEMail.TabIndex = 47 Me.btnEMail.Text = "Mail" ' 'btnDCopy ' Me.btnDCopy.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnDCopy.Location = New System.Drawing.Point(827, 389) Me.btnDCopy.Name = "btnDCopy" Me.btnDCopy.Size = New System.Drawing.Size(88, 32) Me.btnDCopy.TabIndex = 46 Me.btnDCopy.Text = "Copy" ' 'btnCopy ' Me.btnCopy.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnCopy.Location = New System.Drawing.Point(827, 173) Me.btnCopy.Name = "btnCopy" Me.btnCopy.Size = New System.Drawing.Size(88, 32) Me.btnCopy.TabIndex = 52 Me.btnCopy.Text = "Copy(&C)" ' 'btnDDel ' Me.btnDDel.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnDDel.Location = New System.Drawing.Point(827, 349) Me.btnDDel.Name = "btnDDel" Me.btnDDel.Size = New System.Drawing.Size(88, 32) Me.btnDDel.TabIndex = 45 Me.btnDDel.Text = "DEL" ' 'btnDEdit ' Me.btnDEdit.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnDEdit.Location = New System.Drawing.Point(827, 309) Me.btnDEdit.Name = "btnDEdit" Me.btnDEdit.Size = New System.Drawing.Size(88, 32) Me.btnDEdit.TabIndex = 44 Me.btnDEdit.Text = "EDIT" ' 'btnAdd ' Me.btnAdd.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnAdd.Location = New System.Drawing.Point(827, 53) Me.btnAdd.Name = "btnAdd" Me.btnAdd.Size = New System.Drawing.Size(88, 32) Me.btnAdd.TabIndex = 49 Me.btnAdd.Text = "Add(&A)" ' 'btnDAdd ' Me.btnDAdd.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnDAdd.Location = New System.Drawing.Point(827, 269) Me.btnDAdd.Name = "btnDAdd" Me.btnDAdd.Size = New System.Drawing.Size(88, 32) Me.btnDAdd.TabIndex = 43 Me.btnDAdd.Text = "ADD" ' 'btnDel ' Me.btnDel.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnDel.Location = New System.Drawing.Point(827, 133) Me.btnDel.Name = "btnDel" Me.btnDel.Size = New System.Drawing.Size(88, 32) Me.btnDel.TabIndex = 51 Me.btnDel.Text = "Del(&D)" ' 'btnEdit ' Me.btnEdit.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnEdit.Location = New System.Drawing.Point(827, 93) Me.btnEdit.Name = "btnEdit" Me.btnEdit.Size = New System.Drawing.Size(88, 32) Me.btnEdit.TabIndex = 50 Me.btnEdit.Text = "Edit(&E)" ' 'frmDemo ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(927, 562) Me.Controls.Add(Me.btnClose) Me.Controls.Add(Me.btnApprove) Me.Controls.Add(Me.btnEMail) Me.Controls.Add(Me.btnDCopy) Me.Controls.Add(Me.btnCopy) Me.Controls.Add(Me.btnDDel) Me.Controls.Add(Me.btnDEdit) Me.Controls.Add(Me.btnAdd) Me.Controls.Add(Me.btnDAdd) Me.Controls.Add(Me.btnDel) Me.Controls.Add(Me.btnEdit) Me.Controls.Add(Me.iugDetail) Me.Controls.Add(Me.iugBasis) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.Name = "frmDemo" Me.Text = "Demo" Me.Controls.SetChildIndex(Me.iugBasis, 0) Me.Controls.SetChildIndex(Me.iugDetail, 0) Me.Controls.SetChildIndex(Me.btnEdit, 0) Me.Controls.SetChildIndex(Me.btnDel, 0) Me.Controls.SetChildIndex(Me.btnDAdd, 0) Me.Controls.SetChildIndex(Me.btnAdd, 0) Me.Controls.SetChildIndex(Me.btnDEdit, 0) Me.Controls.SetChildIndex(Me.btnDDel, 0) Me.Controls.SetChildIndex(Me.btnCopy, 0) Me.Controls.SetChildIndex(Me.btnDCopy, 0) Me.Controls.SetChildIndex(Me.btnEMail, 0) Me.Controls.SetChildIndex(Me.btnApprove, 0) Me.Controls.SetChildIndex(Me.btnClose, 0) Me.ResumeLayout(False) End Sub Friend WithEvents iugBasis As iMESUltraGrid.iMESUltraGridControl Friend WithEvents iugDetail As iMESUltraGrid.iMESUltraGridControl Friend WithEvents btnClose As Infragistics.Win.Misc.UltraButton Friend WithEvents btnApprove As Infragistics.Win.Misc.UltraButton Friend WithEvents btnEMail As Infragistics.Win.Misc.UltraButton Friend WithEvents btnDCopy As Infragistics.Win.Misc.UltraButton Friend WithEvents btnCopy As Infragistics.Win.Misc.UltraButton Friend WithEvents btnDDel As Infragistics.Win.Misc.UltraButton Friend WithEvents btnDEdit As Infragistics.Win.Misc.UltraButton Friend WithEvents btnAdd As Infragistics.Win.Misc.UltraButton Friend WithEvents btnDAdd As Infragistics.Win.Misc.UltraButton Friend WithEvents btnDel As Infragistics.Win.Misc.UltraButton Friend WithEvents btnEdit As Infragistics.Win.Misc.UltraButton End Class