📄 unit4.~dfm
字号:
object Form4: TForm4
Left = 72
Top = 56
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #36164#26009#24405#20837
ClientHeight = 480
ClientWidth = 761
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = BitBtn2Click
PixelsPerInch = 96
TextHeight = 13
object GroupBox4: TGroupBox
Left = 512
Top = 216
Width = 241
Height = 90
Caption = #26597#25214#21345
TabOrder = 6
object Label7: TLabel
Left = 15
Top = 43
Width = 26
Height = 13
Caption = #23398#21495
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
end
object GroupBox3: TGroupBox
Left = 512
Top = 392
Width = 241
Height = 69
Caption = #20462#25913#21345
TabOrder = 3
end
object GroupBox1: TGroupBox
Left = 7
Top = 8
Width = 490
Height = 454
Caption = #21345#36164#26009
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 18
Width = 26
Height = 13
Caption = #21345#21495
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 16
Top = 73
Width = 26
Height = 13
Caption = #23398#21495
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 16
Top = 136
Width = 26
Height = 13
Caption = #22995#21517
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 16
Top = 204
Width = 26
Height = 13
Caption = #23398#26657
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 16
Top = 326
Width = 26
Height = 13
Caption = #29677#32423
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 16
Top = 266
Width = 26
Height = 13
Caption = #19987#19994
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBEdit1: TDBEdit
Left = 16
Top = 40
Width = 121
Height = 21
Color = clSkyBlue
DataField = 'CARD_NO'
DataSource = Form1.DataSource2
Enabled = False
ReadOnly = True
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 16
Top = 96
Width = 121
Height = 21
Color = clSkyBlue
DataField = 'STU_NO'
DataSource = Form1.DataSource2
Enabled = False
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 16
Top = 158
Width = 121
Height = 21
Color = clSkyBlue
DataField = 'NAME'
DataSource = Form1.DataSource2
Enabled = False
TabOrder = 2
end
object BitBtn1: TBitBtn
Left = 251
Top = 392
Width = 88
Height = 25
Caption = #25552#20132#36164#26009
TabOrder = 3
OnClick = BitBtn1Click
end
object scBox1: TScrollBox
Left = 150
Top = 42
Width = 320
Height = 240
HorzScrollBar.Smooth = True
VertScrollBar.Smooth = True
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Color = clWindow
ParentColor = False
TabOrder = 4
end
object Button3: TButton
Left = 272
Top = 317
Width = 75
Height = 24
Caption = #25668#20687#22836#21442#25968
TabOrder = 5
OnClick = Button3Click
end
object btnEnable: TButton
Left = 168
Top = 317
Width = 73
Height = 24
Hint = 'Enable or disable device stream'
Caption = #21551#29992
TabOrder = 6
OnClick = btnEnableClick
end
object btnSnap: TButton
Left = 377
Top = 317
Width = 72
Height = 24
Hint = 'Click to save current view to a JPEG'
Caption = #25235#21462#22270#29255
Enabled = False
TabOrder = 7
OnClick = btnSnapClick
end
object DBSchoolLookupComboBox: TDBLookupComboBox
Left = 15
Top = 222
Width = 124
Height = 24
DataField = 'SCHOOLID'
DataSource = Form1.DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyField = 'SCHOOLID'
ListField = 'SCHOOLNAME'
ListSource = Form1.Shool
ParentFont = False
TabOrder = 8
end
end
object GroupBox2: TGroupBox
Left = 512
Top = 311
Width = 241
Height = 74
Caption = #27880#38144#21345
TabOrder = 1
object BitBtn3: TBitBtn
Left = 80
Top = 27
Width = 89
Height = 25
Caption = #27880#38144#21345
TabOrder = 0
OnClick = BitBtn3Click
end
end
object BitBtn2: TBitBtn
Left = 592
Top = 415
Width = 89
Height = 26
Caption = #20462#25913#36164#26009
TabOrder = 2
OnClick = BitBtn2Click
end
object Edit1: TEdit
Left = 560
Top = 251
Width = 97
Height = 21
TabOrder = 4
end
object Button2: TButton
Left = 671
Top = 248
Width = 65
Height = 25
Caption = #26597#25214#21345
TabOrder = 5
OnClick = Button2Click
end
object DBImage1: TDBImage
Left = 544
Top = 16
Width = 201
Height = 185
DataField = 'PHOTO'
DataSource = Form1.DataSource2
TabOrder = 7
end
object DBClassLookupComboBox: TDBLookupComboBox
Left = 23
Top = 356
Width = 121
Height = 24
DataField = 'CLASSID'
DataSource = Form1.DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyField = 'CLASSID'
ListField = 'CLASSNAME'
ListSource = Form1.Class
ParentFont = False
TabOrder = 8
end
object DBDEPLookupComboBox: TDBLookupComboBox
Left = 23
Top = 293
Width = 124
Height = 24
DataField = 'DEPID'
DataSource = Form1.DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyField = 'DEPID'
ListField = 'DEPARTMENTNAME'
ListSource = Form1.Dep
ParentFont = False
TabOrder = 9
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -