frmlayout.frm

都是基于VB所做的程序集合,值得大家作为实践的参考资料.

         ButtonHeight    =   582
         Style           =   1
         ImageList       =   "ImageList2"
         _Version        =   393216
         BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
            NumButtons      =   25
            BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "属性"
               ImageIndex      =   7
            EndProperty
            BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "左对齐"
               ImageIndex      =   111
            EndProperty
            BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "右对齐"
               ImageIndex      =   89
            EndProperty
            BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "上对齐"
               ImageIndex      =   91
            EndProperty
            BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "下对齐"
               ImageIndex      =   93
            EndProperty
            BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "网格对齐"
               ImageIndex      =   94
            EndProperty
            BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "水平等距"
               ImageIndex      =   95
            EndProperty
            BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "竖直等距"
               ImageIndex      =   96
            EndProperty
            BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "等高"
               ImageIndex      =   97
            EndProperty
            BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "等宽"
               ImageIndex      =   98
            EndProperty
            BeginProperty Button15 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "等大小"
               ImageIndex      =   99
            EndProperty
            BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button17 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "水平居中"
               ImageIndex      =   103
            EndProperty
            BeginProperty Button18 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "竖直居中"
               ImageIndex      =   101
            EndProperty
            BeginProperty Button19 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "居中"
               ImageIndex      =   104
            EndProperty
            BeginProperty Button20 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button21 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "后移一位"
               ImageIndex      =   105
            EndProperty
            BeginProperty Button22 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "前移一位"
               ImageIndex      =   106
            EndProperty
            BeginProperty Button23 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button24 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "组合"
               ImageIndex      =   107
            EndProperty
            BeginProperty Button25 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "拆分"
               ImageIndex      =   108
            EndProperty
         EndProperty
      End
      Begin MSComctlLib.Toolbar ToolbarLytMap 
         Height          =   270
         Left            =   165
         TabIndex        =   7
         Top             =   420
         Width           =   2505
         _ExtentX        =   4419
         _ExtentY        =   476
         ButtonWidth     =   609
         ButtonHeight    =   582
         Style           =   1
         ImageList       =   "ImageList2"
         _Version        =   393216
         BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
            NumButtons      =   8
            BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "锁定地图"
               ImageIndex      =   83
            EndProperty
            BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "放大地图"
               ImageIndex      =   78
               Style           =   2
            EndProperty
            BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "缩小地图"
               ImageIndex      =   79
               Style           =   2
            EndProperty
            BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "自由缩放地图"
               ImageIndex      =   82
               Style           =   2
            EndProperty
            BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "漫游地图"
               ImageIndex      =   81
               Style           =   2
            EndProperty
            BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "全幅显示地图"
               ImageIndex      =   84
            EndProperty
         EndProperty
      End
      Begin MSComctlLib.Toolbar tlbLayout 
         Height          =   330
         Left            =   165
         TabIndex        =   6
         Top             =   30
         Width           =   10860
         _ExtentX        =   19156
         _ExtentY        =   582
         ButtonWidth     =   609
         ButtonHeight    =   582
         Style           =   1
         ImageList       =   "ImageList2"
         _Version        =   393216
         BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
            NumButtons      =   33
            BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "NewLayout"
               Object.ToolTipText     =   "新建布局"
               ImageIndex      =   1
            EndProperty
            BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "OpenLayout"
               Object.ToolTipText     =   "打开工作空间"
               ImageIndex      =   2
            EndProperty
            BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "SaveLayout"
               Object.ToolTipText     =   "保存工作空间"
               ImageIndex      =   3
            EndProperty
            BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytCut"
               Object.ToolTipText     =   "剪切"
               ImageIndex      =   50
            EndProperty
            BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytCopy"
               Object.ToolTipText     =   "复制"
               ImageIndex      =   51
            EndProperty
            BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytPaste"
               Object.ToolTipText     =   "粘贴"
               ImageIndex      =   52
            EndProperty
            BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               ImageIndex      =   53
               Style           =   3
            EndProperty
            BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytPrint"
               Object.ToolTipText     =   "打印"
               ImageIndex      =   4
            EndProperty
            BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytSel"
               Object.ToolTipText     =   "选择"
               ImageIndex      =   54
               Style           =   2
            EndProperty
            BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytLinesect"
               Object.ToolTipText     =   "画直线"
               ImageIndex      =   55
               Style           =   2
            EndProperty
            BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytArc"
               Object.ToolTipText     =   "画狐线"
               ImageIndex      =   56
               Style           =   2
            EndProperty
            BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytPolyline"
               Object.ToolTipText     =   "画折线"
               ImageIndex      =   58
               Style           =   2
            EndProperty
            BeginProperty Button15 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytRect"
               Object.ToolTipText     =   "画矩形"
               ImageIndex      =   59
               Style           =   2
            EndProperty
            BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytRoundRect"
               Object.ToolTipText     =   "画圆角矩形"
               ImageIndex      =   61
               Style           =   2
            EndProperty
            BeginProperty Button17 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytEllipse"
               Object.ToolTipText     =   "画椭圆"
               ImageIndex      =   62
               Style           =   2
            EndProperty
            BeginProperty Button18 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytPolygon"
               Object.ToolTipText     =   "画多边形"
               ImageIndex      =   64
               Style           =   2
            EndProperty
            BeginProperty Button19 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytText"
               Object.ToolTipText     =   "绘制文本"
               ImageIndex      =   65
               Style           =   2
            EndProperty
            BeginProperty Button20 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytMap"
               Object.ToolTipText     =   "绘制地图"
               ImageIndex      =   66
               Style           =   2
            EndProperty
            BeginProperty Button21 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytTable"
               Object.ToolTipText     =   "表格"
               ImageIndex      =   48
               Style           =   2
            EndProperty
            BeginProperty Button22 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytTemplate"
               Object.ToolTipText     =   "模板"
               ImageIndex      =   49
               Style           =   2
            EndProperty
            BeginProperty Button23 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytArtText"
               Object.ToolTipText     =   "绘制艺术字"
               ImageIndex      =   76
               Style           =   2
            EndProperty
            BeginProperty Button24 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytLengend"
               Object.ToolTipText     =   "绘制图例"
               ImageIndex      =   117
               Style           =   2
            EndProperty
            BeginProperty Button25 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytDirection"
               Object.ToolTipText     =   "绘制指北针"
               ImageIndex      =   118
               Style           =   2
            EndProperty
            BeginProperty Button26 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Key             =   "LytScale"
               Object.ToolTipText     =   "绘制比例尺"
               ImageIndex      =   18
               Style           =   2
            EndProperty
            BeginProperty Button27 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "放大"
               ImageIndex      =   11
               Style           =   2
            EndProperty
            BeginProperty Button28 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "缩小"
               ImageIndex      =   12
               Style           =   2
            EndProperty
            BeginProperty Button29 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Object.ToolTipText     =   "漫游"
               ImageIndex      =   14