⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 form1.frm

📁 MAPINFO+VB的地图编程, 运行前需先安装mapx
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Object = "{9D6ED199-5910-11D2-98A6-00A0C9742CCA}#4.0#0"; "MAPX40.OCX"
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "COMCTL32.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "Comdlg32.ocx"
Begin VB.Form Form1 
   Caption         =   "Form1"
   ClientHeight    =   6120
   ClientLeft      =   165
   ClientTop       =   855
   ClientWidth     =   7455
   LinkTopic       =   "Form1"
   ScaleHeight     =   6120
   ScaleWidth      =   7455
   StartUpPosition =   3  'Windows Default
   Begin ComctlLib.Toolbar Toolbar1 
      Align           =   1  'Align Top
      Height          =   615
      Left            =   0
      TabIndex        =   1
      Top             =   0
      Width           =   7455
      _ExtentX        =   13150
      _ExtentY        =   1085
      ButtonWidth     =   820
      ButtonHeight    =   926
      Appearance      =   1
      _Version        =   327682
      BeginProperty Buttons {0713E452-850A-101B-AFC0-4210102A8DA7} 
         NumButtons      =   9
         BeginProperty Button1 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "打开"
            Key             =   "btn_Open"
            Object.ToolTipText     =   "Open File"
            Object.Tag             =   ""
         EndProperty
         BeginProperty Button2 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Object.Tag             =   ""
            Style           =   4
            MixedState      =   -1  'True
         EndProperty
         BeginProperty Button3 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "指针"
            Key             =   "btn_Arrow"
            Object.Tag             =   ""
            Style           =   2
         EndProperty
         BeginProperty Button4 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "移动"
            Key             =   "btn_Move"
            Object.ToolTipText     =   "Move"
            Object.Tag             =   ""
            Style           =   2
         EndProperty
         BeginProperty Button5 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "放大"
            Key             =   "btn_ZoomIn"
            Object.ToolTipText     =   "ZoomIN"
            Object.Tag             =   ""
            Style           =   2
         EndProperty
         BeginProperty Button6 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "缩小"
            Key             =   "btn_ZoomOut"
            Object.ToolTipText     =   "ZoomOut"
            Object.Tag             =   ""
            Style           =   2
         EndProperty
         BeginProperty Button7 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "显示"
            Key             =   "showpoint"
            Object.Tag             =   ""
         EndProperty
         BeginProperty Button8 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "test"
            Key             =   "test"
            Object.Tag             =   ""
         EndProperty
         BeginProperty Button9 {0713F354-850A-101B-AFC0-4210102A8DA7} 
            Caption         =   "移车"
            Key             =   "movevehicle"
            Object.Tag             =   ""
         EndProperty
      EndProperty
      Begin MSComDlg.CommonDialog Comfileio 
         Left            =   4320
         Top             =   120
         _ExtentX        =   847
         _ExtentY        =   847
         _Version        =   393216
      End
   End
   Begin MapXLib.Map Map1 
      Height          =   4455
      Left            =   360
      TabIndex        =   0
      Top             =   825
      Width           =   6495
      _Version        =   400013
      _ExtentX        =   11456
      _ExtentY        =   7858
      _StockProps     =   1
      GeoDictionary   =   "GeoDictionary"
      GeoSet          =   "Asia"
      GeoSetUserName  =   "Asia"
      CurrentTool     =   1000
      Zoom            =   11000
      MaxSearchTime   =   30
      CenterX         =   90.6100512121236
      CenteryY        =   32.9237531670907
      Rotation        =   0
      FeatureEditMode =   1
      NodeHandleSize  =   0
      TitleText       =   "Asia"
      DataSetGeoField =   ""
      AutoRedraw      =   -1  'True
      PreferCompactLegends=   0   'False
      TitleVisible    =   -1  'True
      MousePointer    =   0
      MouseIcon       =   ""
      MatchThreshold  =   80
      WaitCursorEnabled=   -1  'True
      MousewheelSupport=   1
      MatchNumericFields=   0   'False
      RedrawInterval  =   100
      PanAnimationLayer=   0   'False
      InfotipSupport  =   -1  'True
      InfotipPopupDelay=   500
      DefaultConversionResolution=   12
      ExportSelection =   0   'False
      NumLayers       =   3
      Layer0.path     =   "Asiacaps.TAB"
      Layer0.name     =   "Asia Capitals"
      Layer0.visible  =   -1  'True
      Layer0.selectable=   -1  'True
      Layer0.editable =   0   'False
      Layer0.shownodes=   0   'False
      Layer0.showcentroids=   0   'False
      Layer0.showlinedirection=   0   'False
      Layer0.autolabel=   -1  'True
      Layer0.zoomlayering=   -1  'True
      Layer0.minzoom  =   3000
      Layer0.maxzoom  =   10000
      Layer0.DrawLabelsAfter=   0   'False
      Layer0.styleoverride=   0   'False
      Layer0.labelstyle.TextFontBackColor=   16777215
      Layer0.labelstyle.SymbolChar=   0
      BeginProperty Layer0.labelstyle.TextFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "System"
         Size            =   12
         Charset         =   134
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Layer0.labelstyle.LineStyle=   1
      Layer0.labelstyle.LineWidth=   1
      Layer0.LabelMax =   100
      Layer0.LabelOverlap=   0   'False
      Layer0.LabelDuplicate=   0   'False
      Layer0.LabelOffset=   2
      Layer0.LabelLineType=   2
      Layer0.LabelZoomMax=   10000
      Layer0.LabelZoomMin=   0
      Layer0.LabelZoom=   0   'False
      Layer0.LabelVisible=   -1  'True
      Layer0.LabelOrientation=   5
      Layer0.LabelParellel=   -1  'True
      Layer0.PartialSegments=   0   'False
      Layer1.path     =   "Asicty79.TAB"
      Layer1.name     =   "Asia Major Cities"
      Layer1.visible  =   -1  'True
      Layer1.selectable=   -1  'True
      Layer1.editable =   0   'False
      Layer1.shownodes=   0   'False
      Layer1.showcentroids=   0   'False
      Layer1.showlinedirection=   0   'False
      Layer1.autolabel=   -1  'True
      Layer1.zoomlayering=   -1  'True
      Layer1.minzoom  =   0
      Layer1.maxzoom  =   3000
      Layer1.DrawLabelsAfter=   0   'False
      Layer1.styleoverride=   0   'False
      Layer1.labelstyle.TextFontBackColor=   16777215
      Layer1.labelstyle.SymbolChar=   0
      BeginProperty Layer1.labelstyle.TextFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "System"
         Size            =   12
         Charset         =   134
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Layer1.labelstyle.LineStyle=   1
      Layer1.labelstyle.LineWidth=   1
      Layer1.LabelMax =   100
      Layer1.LabelOverlap=   0   'False
      Layer1.LabelDuplicate=   0   'False
      Layer1.LabelOffset=   2
      Layer1.LabelLineType=   2
      Layer1.LabelZoomMax=   10000
      Layer1.LabelZoomMin=   0
      Layer1.LabelZoom=   0   'False
      Layer1.LabelVisible=   -1  'True
      Layer1.LabelOrientation=   5
      Layer1.LabelParellel=   -1  'True
      Layer1.PartialSegments=   0   'False
      Layer2.path     =   "Asia.TAB"
      Layer2.name     =   "Asia"
      Layer2.visible  =   -1  'True
      Layer2.selectable=   -1  'True
      Layer2.editable =   0   'False
      Layer2.shownodes=   0   'False
      Layer2.showcentroids=   0   'False
      Layer2.showlinedirection=   0   'False
      Layer2.autolabel=   -1  'True
      Layer2.zoomlayering=   0   'False
      Layer2.minzoom  =   0
      Layer2.maxzoom  =   0
      Layer2.DrawLabelsAfter=   0   'False
      Layer2.styleoverride=   0   'False
      Layer2.labelstyle.TextFontColor=   128
      Layer2.labelstyle.SymbolChar=   0
      BeginProperty Layer2.labelstyle.TextFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "Arial"
         Size            =   8.25
         Charset         =   0
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Layer2.labelstyle.LineStyle=   1
      Layer2.labelstyle.LineWidth=   1
      Layer2.LabelMax =   100
      Layer2.LabelOverlap=   0   'False
      Layer2.LabelDuplicate=   0   'False
      Layer2.LabelOffset=   2
      Layer2.LabelLineType=   0
      Layer2.LabelZoomMax=   10000
      Layer2.LabelZoomMin=   0
      Layer2.LabelZoom=   0   'False
      Layer2.LabelVisible=   -1  'True
      Layer2.LabelOrientation=   0
      Layer2.LabelParellel=   -1  'True
      Layer2.PartialSegments=   0   'False
      TitleStyle.TextFontBackColor=   16777215
      TitleStyle.TextFontOpaque=   -1  'True
      TitleStyle.SymbolChar=   0
      BeginProperty TitleStyle.TextFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "Arial"
         Size            =   21.75
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      BeginProperty TitleStyle.SymbolFont {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "Arial"
         Size            =   8.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -