📄 main.~dfm
字号:
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666660666666666666060666666666666600066666666666660
0006666666666660006666666666666006660606060606006666666666666666
6666066666666606666666666666666666660666666666066666666666666666
6666066666666606666666666666666666660606060606066666}
end
object Sbpolygon: TSpeedButton
Left = 41
Top = 0
Width = 40
Height = 25
GroupIndex = 1
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666666666000000000000666606666666666066666066666666
6066666066666666606666660666660000666666066666066666666660666660
6666666660666660666666666606666606666666660666660666666666606666
6066666666600000006666666666666666666666666666666666}
end
object SbPoint: TSpeedButton
Left = 0
Top = 0
Width = 41
Height = 25
GroupIndex = 1
Down = True
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666006666666666666600666666666666600666666666606660066
6666666600600666666666660000066666666666000000006666666600000006
6666666600000066666666660000066666666666000066666666666600066666
6666666600666666666666660666666666666666666666666666}
end
object Label3: TLabel
Left = 488
Top = 8
Width = 60
Height = 13
Caption = '空间关系:'
end
object Cbbrelation: TComboBox
Left = 562
Top = 0
Width = 145
Height = 21
ItemHeight = 13
TabOrder = 0
end
object Cbblayers: TComboBox
Left = 262
Top = 0
Width = 76
Height = 21
ItemHeight = 13
TabOrder = 1
Text = 'Cbblayers'
end
object Cbbuse: TComboBox
Left = 395
Top = 0
Width = 73
Height = 21
ItemHeight = 13
TabOrder = 2
Text = 'Cbbuse'
end
end
object MainMenu1: TMainMenu
Left = 648
Top = 24
object F1: TMenuItem
Caption = '文件(&F)'
object MnOpenShapeFile: TMenuItem
Caption = '打开SHP文件...'
OnClick = MnOpenShapeFileClick
end
object MnOpenCADFile: TMenuItem
Caption = '打开CAD文件'
OnClick = MnOpenCADFileClick
object MnOpoint: TMenuItem
Tag = 1
Caption = '点文件...'
OnClick = MnOpointClick
end
object MnOline: TMenuItem
Tag = 2
Caption = '线文件...'
OnClick = MnOpointClick
end
object MnOpoygen: TMenuItem
Tag = 3
Caption = '面文件...'
OnClick = MnOpointClick
end
end
object MnOpenEmageFile: TMenuItem
Caption = '打开影像文件...'
OnClick = MnOpenEmageFileClick
end
object MnExportMap: TMenuItem
Caption = '地图打印'
Enabled = False
end
object MnEXIT: TMenuItem
Caption = '退出'
OnClick = MnEXITClick
end
end
object V1: TMenuItem
Caption = '视图(&V)'
object MnVLocalMap: TMenuItem
Tag = 1
Break = mbBreak
Caption = '全图'
Checked = True
OnClick = MnVLocalMapClick
end
object MnVTool: TMenuItem
Tag = 2
Caption = '工具栏'
Checked = True
OnClick = MnVLocalMapClick
end
object MnVPose: TMenuItem
Tag = 3
Caption = '状态栏'
Checked = True
OnClick = MnVLocalMapClick
end
object MnSTool: TMenuItem
Tag = 4
Caption = '空间查询工具'
OnClick = MnVLocalMapClick
end
object N1: TMenuItem
Caption = '-'
end
object MnVAttrabute: TMenuItem
Tag = 5
Caption = '打开属性'
OnClick = MnVLocalMapClick
end
object Mnzl: TMenuItem
Tag = 6
Caption = '资料'
Checked = True
Enabled = False
OnClick = MnVLocalMapClick
end
end
object L1: TMenuItem
Caption = '图层(&L)'
object MnLayerMana: TMenuItem
Caption = '图层管理'
OnClick = MnLayerManaClick
end
object MnRenderer: TMenuItem
Caption = '专题图'
OnClick = MnRendererClick
end
object MnLayerSet: TMenuItem
Caption = '属性设置'
OnClick = MnLayerSetClick
end
object MnLabel: TMenuItem
Caption = '图层标注'
OnClick = MnLabelClick
end
end
object Q1: TMenuItem
Caption = '查询(&Q)'
object MnSbyExpree: TMenuItem
Caption = '属性查询'
OnClick = MnSbyExpreeClick
end
object MnSbyDistance: TMenuItem
Caption = '距离查询'
OnClick = MnSbyDistanceClick
end
object MnSbyShape: TMenuItem
Caption = '空间查询'
OnClick = MnSbyShapeClick
end
object MnFlashGet: TMenuItem
Caption = '快速获取'
OnClick = MnFlashGetClick
end
object MnEasyS: TMenuItem
Caption = '地名查询'
OnClick = MnEasySClick
end
object MnSMen: TMenuItem
Caption = '查找住址'
OnClick = MnSMenClick
end
end
object H1: TMenuItem
Tag = 1
Caption = '帮助(&H)'
object MnHelp: TMenuItem
Caption = '帮助'
OnClick = MnHelpClick
end
object MnAbout: TMenuItem
Caption = '关于...'
OnClick = MnAboutClick
end
end
end
object OpenDialog1: TOpenDialog
Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
Left = 680
Top = 26
end
object PopupMenu1: TPopupMenu
Left = 717
Top = 23
object PmZoomIn: TMenuItem
Tag = 1
Bitmap.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000C40E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
4466666666666664744666666666664744466666666664744466666600004744
46666600777F8444666660877777F8086666607770777F066666077770777770
6666077000007770666607F770777770666607F770777770666660FF77777706
6666608FFF777806666666007777006666666666000066666666}
Caption = '放大'
GroupIndex = 1
OnClick = PmZoomInClick
end
object PmZoomOut: TMenuItem
Tag = 2
Bitmap.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000C40E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
4466666666666664744666666666664744466666666664744466666600004744
46666600777F8444666660877777F8086666607777777F066666077777777770
6666077777777770666607F700007770666607F777777770666660FF77777706
6666608FFF777806666666007777006666666666000066666666}
Caption = '缩小'
GroupIndex = 1
OnClick = PmZoomInClick
end
object PmPan: TMenuItem
Tag = 3
Bitmap.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
4466666660FFFFFF066666660FFFFFFF06666660FFFFFFFFF066660FFFFFFFFF
F066660FFFFFFFFFFF0660FFFFFFFFFFFF060FFF0FFFFFFFFF060FF00FFFFFFF
FFF060060FFFFFFF0FF06660FF0FF0FF0FF06660FF0FF0FF00F0660FF00FF0FF
0606660FF00FF0FF06666660060FF00066666666666006666666}
Caption = '平移'
GroupIndex = 1
OnClick = PmZoomInClick
end
object N7: TMenuItem
Caption = '-'
GroupIndex = 1
end
object PmMeasure: TMenuItem
Tag = 4
Bitmap.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000C40E0000C40E00000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00000000000000797B00797B00000000797B00797B00000000
797B00797B00000000797B00797B00000000797B00797B000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C07B797B0000007B797BC0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C07B797B0000007B797BC0C0C0000000000000
0000000000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000
00000000000000C0C0C07B797B0000007B797BC0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C07B797B0000007B797BC0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
Caption = '测距'
GroupIndex = 1
OnClick = PmZoomInClick
end
object N10: TMenuItem
Caption = '-'
GroupIndex = 1
end
object PmReady: TMenuItem
Tag = 5
Bitmap.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666006666666666666600666666666666600666666666606660066
6666666600600666666666660000066666666666000000006666666600000006
6666666600000066666666660000066666666666000066666666666600066666
6666666600666666666666660666666666666666666666666666}
Caption = '停止'
GroupIndex = 1
OnClick = PmZoomInClick
end
object PmFulExten: TMenuItem
Tag = 6
Bitmap.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
66666666668888866666666688CCC22886666668CCCC2222C8666687CC762222
26866686C722222222866876C7222222CCC8687CC222222C22C868C7CCC22C22
24C86877C2CCCCCC4C286877CC2CCC2C4C2866877C2222222286668CCCC2C222
22866668CC6CC222286666668882C22886666666668888866666}
Caption = '1:1'
GroupIndex = 1
OnClick = PmFulExtenClick
end
end
object Timer1: TTimer
Enabled = False
OnTimer = Timer1Timer
Left = 613
Top = 23
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -