📄 frmmapx.frm
字号:
VERSION 5.00
Object = "{9D6ED199-5910-11D2-98A6-00A0C9742CCA}#4.0#0"; "MAPX40.OCX"
Begin VB.Form Form1
BorderStyle = 3 'Fixed Dialog
Caption = $"FrmMapX.frx":0000
ClientHeight = 8115
ClientLeft = 45
ClientTop = 330
ClientWidth = 10545
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 8115
ScaleWidth = 10545
ShowInTaskbar = 0 'False
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton CmdPan
Caption = "拖动"
Height = 400
Left = 3240
TabIndex = 4
Top = 7395
Width = 1200
End
Begin MapXLib.Map Map2
Height = 2055
Left = 0
TabIndex = 3
Top = 5160
Width = 2175
_Version = 400013
_ExtentX = 3836
_ExtentY = 3625
_StockProps = 1
GeoDictionary = "GeoDictionary"
GeoSet = "Asia"
GeoSetUserName = "Asia"
CurrentTool = 1000
Zoom = 11000
MaxSearchTime = 30
CenterX = 90.610050953679
CenteryY = 32.9237620865283
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 = 10
PanAnimationLayer= 0 'False
InfotipSupport = -1 'True
InfotipPopupDelay= 500
MapBackColor = -2147483624
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 = 9.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 = 14.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
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
HasProjectionInfo= -1 'True
NumericCoordsys = "FrmMapX.frx":0018
DisplayCoordsys = "FrmMapX.frx":0148
NumDatasets = 0
TitleX = 5000
TitleY = 1000
TitleVisible = -1 'True
TitleEditable = -1 'True
TitlePostiion = 0
TitleBorder = -1 'True
End
Begin VB.CommandButton CmdZoomOut
Caption = "缩小"
Height = 400
Left = 1680
TabIndex = 2
Top = 7395
Width = 1200
End
Begin VB.CommandButton CmdZoomIn
Caption = "放大"
Height = 400
Left = 120
TabIndex = 1
Top = 7395
Width = 1200
End
Begin MapXLib.Map Map1
Height = 7215
Left = 0
TabIndex = 0
Top = 0
Width = 10575
_Version = 400013
_ExtentX = 18653
_ExtentY = 12726
_StockProps = 1
GeoDictionary = "GeoDictionary"
GeoSet = "Asia"
GeoSetUserName = "Asia"
CurrentTool = 1000
Zoom = 5500
MaxSearchTime = 30
CenterX = 90.6100509571716
CenteryY = 32.9237619659953
Rotation = 0
FeatureEditMode = 1
NodeHandleSize = 0
TitleText = "Asia"
DataSetGeoField = ""
AutoRedraw = -1 'True
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -