📄 frmmain.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form frmMain
Caption = "交通电子拍照管理系统"
ClientHeight = 5880
ClientLeft = 165
ClientTop = 855
ClientWidth = 10215
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Icon = "frmMain.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
ScaleHeight = 5880
ScaleWidth = 10215
StartUpPosition = 3 'Windows Default
WindowState = 2 'Maximized
Begin MSComctlLib.ListView lstViwClients
Height = 888
Left = 5616
TabIndex = 5
Top = 780
Width = 1152
_ExtentX = 2037
_ExtentY = 1561
LabelWrap = 0 'False
HideSelection = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
Icons = "ImageList2"
SmallIcons = "ImageList2"
ForeColor = -2147483640
BackColor = -2147483637
BorderStyle = 1
Appearance = 1
Enabled = 0 'False
NumItems = 0
End
Begin MSComctlLib.ImageList ImageList2
Left = 4710
Top = 735
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 2
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":030A
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":0626
Key = ""
EndProperty
EndProperty
End
Begin MSComctlLib.ImageList ImageList1
Left = 1080
Top = 690
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 32
ImageHeight = 32
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 6
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":0942
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":0D96
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":0EAA
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":12FE
Key = ""
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":1412
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":1526
Key = ""
EndProperty
EndProperty
End
Begin VB.Timer timDateTime
Interval = 1000
Left = 3345
Top = 4890
End
Begin MSComctlLib.ListView lstViwCapture
Height = 756
Left = 96
TabIndex = 1
Top = 2808
Width = 1500
_ExtentX = 2646
_ExtentY = 1349
LabelEdit = 1
LabelWrap = 0 'False
HideSelection = 0 'False
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin MSComctlLib.StatusBar stdBar
Align = 2 'Align Bottom
Height = 480
Left = 0
TabIndex = 0
Top = 5400
Width = 10215
_ExtentX = 18018
_ExtentY = 847
_Version = 393216
BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628}
NumPanels = 3
BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628}
AutoSize = 1
Object.Width = 12356
Text = "当前待处记录数："
TextSave = "当前待处记录数："
EndProperty
BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628}
AutoSize = 2
EndProperty
BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628}
EndProperty
EndProperty
End
Begin VB.Label labClients
Alignment = 2 'Center
BackColor = &H00C0E0FF&
BorderStyle = 1 'Fixed Single
Caption = "路 口 工 作 状 态"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 4305
TabIndex = 4
Top = 2700
Width = 2700
End
Begin VB.Line Line2
BorderColor = &H80000009&
BorderWidth = 2
X1 = 3150
X2 = 6105
Y1 = 3360
Y2 = 3360
End
Begin VB.Line Line1
BorderColor = &H00808080&
BorderWidth = 2
X1 = 3150
X2 = 6150
Y1 = 3225
Y2 = 3225
End
Begin VB.Label labCapturePicture
Alignment = 2 'Center
BackColor = &H00C0E0FF&
BorderStyle = 1 'Fixed Single
Caption = "抓 拍 的 图 片"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 7095
TabIndex = 3
Top = 2475
Width = 1740
End
Begin VB.Image Image1
BorderStyle = 1 'Fixed Single
Height = 495
Left = 3585
Top = 3675
Width = 1215
End
Begin VB.Label labRecToHandle
Alignment = 2 'Center
BackColor = &H00C0E0FF&
BorderStyle = 1 'Fixed Single
Caption = "待 处 报 警 记 录"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 2970
TabIndex = 2
Top = 2115
Width = 3180
End
Begin VB.Menu mnuSys
Caption = "[&S]系统"
Begin VB.Menu mnuSetPassWord
Caption = "[&M]设置操作密码"
End
Begin VB.Menu mnuClientSet
Caption = "[&C]设置机器信息"
End
Begin VB.Menu mnuIntervalSet
Caption = "[&I]设置时间间隔"
End
Begin VB.Menu mnuExit
Caption = "[&E]退出系统"
End
End
Begin VB.Menu mnuComm
Caption = "[&M]操作"
Begin VB.Menu mnuQuery
Caption = "[&Q]查询数据记录"
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -