emme2 plugin.frm

一个交通专用的gis-T系统

VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{E760686B-BC9E-4802-9ECF-175FDF4062CE}#5.0#0"; "MAPX50.DLL"
Begin VB.Form Main 
   Caption         =   "GIS-T INTERFACE"
   ClientHeight    =   7290
   ClientLeft      =   2055
   ClientTop       =   3015
   ClientWidth     =   10875
   Icon            =   "EMME2 Plugin.frx":0000
   LinkTopic       =   "Form1"
   ScaleHeight     =   7290
   ScaleMode       =   0  'User
   ScaleWidth      =   11001.52
   WindowState     =   2  'Maximized
   Begin MapXLib.Map Mapshow 
      Height          =   4455
      Left            =   2400
      TabIndex        =   2
      Top             =   840
      Width           =   5295
      _Version        =   500012
      _ExtentX        =   9340
      _ExtentY        =   7858
      _StockProps     =   1
      MapCatalog.GeoDictionary=   "Empty GeoDictKeyName {01A9504B-CE13-4415-A5A0-51D8C2F15204}"
      GeoSet          =   "Empty GeosetName {9A9AC2F4-8375-44d1-BCEB-476AE986F190}"
      CurrentTool     =   1001
      DefaultStyle.TextFontBackColor=   16777215
      DefaultStyle.SupportsBitmapSymbols=   -1  'True
      DefaultStyle.SymbolChar=   55
      DefaultStyle.SymbolFontBackColor=   16777215
      BeginProperty DefaultStyle.TextFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "Arial"
         Size            =   9.75
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      BeginProperty DefaultStyle.SymbolFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "Map Symbols"
         Size            =   14.25
         Charset         =   2
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      DefaultStyle.LineStyle=   1
      DefaultStyle.LineWidth=   1
      DefaultStyle.RegionColor=   16777215
      DefaultStyle.LinePattern=   2
      DefaultStyle.RegionBackColor=   16777215
      DefaultStyle.RegionBorderStyle=   1
      DefaultStyle.RegionBorderWidth=   1
      Title.Visible   =   0   'False
      Title.Text      =   "Empty Title {01A9504B-CE13-4415-A5A0-51D8C2F15204}"
      Title.Style.TextFontBackColor=   16777215
      Title.Style.TextFontOpaque=   -1  'True
      Title.Style.SymbolChar=   0
      BeginProperty Title.Style.TextFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "Arial"
         Size            =   23.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      BeginProperty Title.Style.SymbolFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "Arial"
         Size            =   23.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Title.X         =   1764
      Title.Y         =   297
      Map.NumericCoordSys.ProjectionInfo=   "EMME2 Plugin.frx":08CA
      Map.DisplayCoordSys.ProjectionInfo=   "EMME2 Plugin.frx":09FA
   End
   Begin MSComDlg.CommonDialog dlgCommonDialog 
      Left            =   1680
      Top             =   1680
      _ExtentX        =   847
      _ExtentY        =   847
      _Version        =   393216
   End
   Begin MSComctlLib.StatusBar SbXY 
      Align           =   2  'Align Bottom
      Height          =   255
      Left            =   0
      TabIndex        =   1
      Top             =   7035
      Width           =   10875
      _ExtentX        =   19182
      _ExtentY        =   450
      _Version        =   393216
      BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
         NumPanels       =   3
         BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            AutoSize        =   2
            Object.Width           =   4366
            MinWidth        =   4359
         EndProperty
         BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Object.Width           =   4359
            MinWidth        =   4359
         EndProperty
         BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            AutoSize        =   1
            Object.Width           =   9895
         EndProperty
      EndProperty
   End
   Begin MSComctlLib.Toolbar Toolbar1 
      Align           =   1  'Align Top
      Height          =   360
      Left            =   0
      TabIndex        =   0
      Top             =   0
      Width           =   10875
      _ExtentX        =   19182
      _ExtentY        =   635
      ButtonWidth     =   609
      ButtonHeight    =   582
      Appearance      =   1
      Style           =   1
      ImageList       =   "ToolImages"
      _Version        =   393216
      BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
         NumButtons      =   25
         BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "New"
            Object.ToolTipText     =   "新建项目"
            ImageIndex      =   14
         EndProperty
         BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Open"
            Object.ToolTipText     =   "打开项目"
            ImageIndex      =   15
         EndProperty
         BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Print"
            Object.ToolTipText     =   "打印"
            ImageIndex      =   17
         EndProperty
         BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Arrow"
            Object.ToolTipText     =   "箭头"
            ImageIndex      =   1
         EndProperty
         BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Zoom In"
            Object.ToolTipText     =   "放大"
            ImageIndex      =   2
         EndProperty
         BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Zoom Out"
            Object.ToolTipText     =   "缩小"
            ImageIndex      =   3
         EndProperty
         BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Pan"
            Object.ToolTipText     =   "漫游器"
            ImageIndex      =   4
         EndProperty
         BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Ruler"
            Object.ToolTipText     =   "直尺"
            ImageIndex      =   5
         EndProperty
         BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Select"
            Object.ToolTipText     =   "选择"
            ImageIndex      =   6
         EndProperty
         BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Select Rectangle"
            Object.ToolTipText     =   "矩形选择"
            ImageIndex      =   7
         EndProperty
         BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Select Radius"
            Object.ToolTipText     =   "半径选择"
            ImageIndex      =   8
         EndProperty
         BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Select Polygon"
            Object.ToolTipText     =   "多边形选择"
            ImageIndex      =   9
         EndProperty
         BeginProperty Button15 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Label"
            Object.ToolTipText     =   "标注"
            ImageIndex      =   10
         EndProperty
         BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Add Symbol Annotation"
            Object.ToolTipText     =   "添加符号"
            ImageIndex      =   11
         EndProperty
         BeginProperty Button17 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Add Text Annotation"
            Object.ToolTipText     =   "添加文本"
            ImageIndex      =   12
         EndProperty
         BeginProperty Button18 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button19 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Add Node"
            Object.ToolTipText     =   "新建节点"
            ImageIndex      =   18
         EndProperty
         BeginProperty Button20 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "Add Link"
            Object.ToolTipText     =   "新建路段"
            ImageIndex      =   19
         EndProperty
         BeginProperty Button21 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "proper"
            Object.ToolTipText     =   "对象属性"
            ImageIndex      =   20
         EndProperty
         BeginProperty Button22 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "delete"
            Object.ToolTipText     =   "删除"
            ImageIndex      =   21
         EndProperty
         BeginProperty Button23 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Style           =   3
         EndProperty
         BeginProperty Button24 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "search"
            Object.ToolTipText     =   "查找"
            ImageIndex      =   22
         EndProperty
         BeginProperty Button25 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Key             =   "layer"
            Object.ToolTipText     =   "图层"
            ImageIndex      =   13
         EndProperty
      EndProperty
   End
   Begin MSComctlLib.ImageList ToolImages 
      Left            =   840
      Top             =   1080
      _ExtentX        =   1005
      _ExtentY        =   1005
      BackColor       =   -2147483643
      ImageWidth      =   16
      ImageHeight     =   16
      MaskColor       =   12632256
      _Version        =   393216
      BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
         NumListImages   =   22
         BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":0B2A
            Key             =   "Arrow"
         EndProperty
         BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":0E7E
            Key             =   "Zoom In"
         EndProperty
         BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":11D2
            Key             =   "Zoom Out"
         EndProperty
         BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":1526
            Key             =   "Move"
         EndProperty
         BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":187A
            Key             =   "Ruler"
         EndProperty
         BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":1BCE
            Key             =   "Select"
         EndProperty
         BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":1F22
            Key             =   "Select Rectangle"
         EndProperty
         BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":2276
            Key             =   "Select Radius"
         EndProperty
         BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":25CA
            Key             =   "Select Polygon"
         EndProperty
         BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":291E
            Key             =   ""
         EndProperty
         BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":2C72
            Key             =   "Insert Symbol Annotation"
         EndProperty
         BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":2FC6
            Key             =   "Insert Text Annotation"
         EndProperty
         BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":3326
            Key             =   "Layers Controls"
         EndProperty
         BeginProperty ListImage14 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":367A
            Key             =   ""
         EndProperty
         BeginProperty ListImage15 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":3BBC
            Key             =   ""
         EndProperty
         BeginProperty ListImage16 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":40FE
            Key             =   ""
         EndProperty
         BeginProperty ListImage17 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":4640
            Key             =   ""
         EndProperty
         BeginProperty ListImage18 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":4B82
            Key             =   ""
         EndProperty
         BeginProperty ListImage19 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":4CDC
            Key             =   ""
         EndProperty
         BeginProperty ListImage20 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":5276
            Key             =   ""
         EndProperty
         BeginProperty ListImage21 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":5810
            Key             =   ""
         EndProperty
         BeginProperty ListImage22 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "EMME2 Plugin.frx":596A
            Key             =   ""
         EndProperty
      EndProperty
   End
   Begin MSComDlg.CommonDialog CdlExportMap 
      Left            =   840
      Top             =   2520
      _ExtentX        =   847
      _ExtentY        =   847
      _Version        =   393216
   End
   Begin VB.Line Line1 
      BorderColor     =   &H80000005&
      Index           =   2
      X1              =   0
      X2              =   11047.04
      Y1              =   380
      Y2              =   380
   End
   Begin VB.Line Line1 
      BorderColor     =   &H80000003&
      Index           =   1
      X1              =   0
      X2              =   11047.04
      Y1              =   360
      Y2              =   360
   End
   Begin VB.Menu mnufile 
      Caption         =   "文件(&F)"
      Begin VB.Menu mnunewproject 
         Caption         =   "新建项目(&N)"
         Shortcut        =   ^N
      End
      Begin VB.Menu openproject 
         Caption         =   "打开项目(&O)"
         Shortcut        =   ^O
      End
      Begin VB.Menu mnucloseproject 
         Caption         =   "关闭项目(&Q)"
         Shortcut        =   ^Q
      End
      Begin VB.Menu mnusep1 
         Caption         =   "-"
      End
      Begin VB.Menu mnudir 
         Caption         =   "数据导入向导(&I)..."
         Shortcut        =   ^I
      End
      Begin VB.Menu mnuopenproject 
         Caption         =   "数据输出(&E)..."
         Enabled         =   0   'False
         Shortcut        =   ^E
      End
      Begin VB.Menu barsvae 
         Caption         =   "-"
      End
      Begin VB.Menu mnuprintsetup 
         Caption         =   "打印设置(&S)"
      End
      Begin VB.Menu mnuprint 
         Caption         =   "打印(&P)"
         Shortcut        =   ^P
      End
      Begin VB.Menu mnuexportmap 
         Caption         =   "图像输出(I)..."
      End
      Begin VB.Menu bar1 
         Caption         =   "-"
      End
      Begin VB.Menu mnuclose 
         Caption         =   "退出(&E)"
      End
   End
   Begin VB.Menu mnulayers 
      Caption         =   "图形(&L)"
      Begin VB.Menu mnuaddlayers 
         Caption         =   "添加栅格图层(&A)"
      End
      Begin VB.Menu mnulayerscontrol 
         Caption         =   "图层控制(&L)"
      End
      Begin VB.Menu spimg 
         Caption         =   "-"
      End
      Begin VB.Menu mnusearch 
         Caption         =   "图元搜索(&S)"
      End
      Begin VB.Menu mnudelimg 
         Caption         =   "图元删除(&D)"
         Shortcut        =   {DEL}
      End
      Begin VB.Menu spsearch 
         Caption         =   "-"
      End
      Begin VB.Menu mnufindplace 
         Caption         =   "坐标定位(&C)"
      End
   End
   Begin VB.Menu mnuthemein 
      Caption         =   "数据(&D)"
      Begin VB.Menu mnudatamanage 
         Caption         =   "数据库管理(M)"
      End
   End
   Begin VB.Menu mnunode 
      Caption         =   "节点(&N)"
      Begin VB.Menu mnuaddnode 
         Caption         =   "添加节点(&A)"