📄 c_vcdback.dfm
字号:
object cfrm_vcdback: Tcfrm_vcdback
Left = 271
Top = 172
Width = 525
Height = 368
Caption = #36824#31199#32467#31639
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnKeyPress = FormKeyPress
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object group_hy: TGroupBox
Left = 8
Top = 46
Width = 217
Height = 41
TabOrder = 0
object Label1: TLabel
Left = 25
Top = 17
Width = 60
Height = 12
Caption = #20250#21592#35777#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object e_hyid: TEdit
Left = 89
Top = 13
Width = 86
Height = 21
TabOrder = 0
OnChange = e_hyidChange
OnExit = e_hyidExit
OnKeyDown = e_hyidKeyDown
end
end
object ZTL: TStatusBar
Left = 0
Top = 322
Width = 517
Height = 19
Panels = <
item
Text = #27880#24847':'#30452#25509#20851#38381#31383#21475#23558#19981#20445#23384#24403#21069#25805#20316#20869#23481
Width = 300
end
item
Width = 50
end>
end
object group_zlr: TRadioGroup
Left = 8
Top = 1
Width = 233
Height = 41
Caption = #31199#36161#20154
Columns = 2
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemIndex = 0
Items.Strings = (
#20250#21592
#38646#31199)
ParentFont = False
TabOrder = 2
OnClick = group_zlrClick
end
object Group_zl: TGroupBox
Left = 248
Top = 1
Width = 265
Height = 96
Caption = #20250#21592#36164#26009
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
object Label2: TLabel
Left = 25
Top = 24
Width = 36
Height = 12
Caption = #22995#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 148
Top = 24
Width = 36
Height = 12
Caption = #24615#21035#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 21
Top = 48
Width = 48
Height = 12
Caption = #35777#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 148
Top = 48
Width = 36
Height = 12
Caption = #25276#37329#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 25
Top = 72
Width = 36
Height = 12
Caption = #30005#35805#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object e_zlname: TEdit
Left = 67
Top = 19
Width = 61
Height = 18
Color = cl3DLight
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
end
object e_zlsex: TEdit
Left = 184
Top = 20
Width = 57
Height = 18
Color = cl3DLight
Ctl3D = False
ParentCtl3D = False
TabOrder = 1
end
object e_zlzlx: TEdit
Left = 67
Top = 45
Width = 61
Height = 18
Color = cl3DLight
Ctl3D = False
ParentCtl3D = False
TabOrder = 2
end
object e_zlyj: TEdit
Left = 184
Top = 45
Width = 57
Height = 18
Color = cl3DLight
Ctl3D = False
ParentCtl3D = False
TabOrder = 3
end
object e_zltel: TEdit
Left = 67
Top = 68
Width = 174
Height = 18
Color = cl3DLight
Ctl3D = False
ParentCtl3D = False
TabOrder = 4
end
end
object Group_qp: TGroupBox
Left = 8
Top = 46
Width = 217
Height = 41
TabOrder = 4
Visible = False
object Label14: TLabel
Left = 27
Top = 18
Width = 168
Height = 12
Caption = #19981#36827#34892#35760#36153#12289#19981#30331#35760#29616#37329#25910#25903#24080
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
end
object Group_lz: TGroupBox
Left = 8
Top = 48
Width = 233
Height = 49
TabOrder = 5
Visible = False
object Label8: TLabel
Left = 12
Top = 18
Width = 48
Height = 12
Caption = #25276#37329#21333#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 131
Top = 18
Width = 36
Height = 12
Caption = #25276#37329#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object e_yjid: TEdit
Left = 56
Top = 13
Width = 61
Height = 21
TabOrder = 0
OnChange = e_yjidChange
OnExit = e_yjidExit
OnKeyDown = e_yjidKeyDown
end
object e_yj: TEdit
Left = 164
Top = 15
Width = 61
Height = 19
Color = cl3DLight
Ctl3D = False
Enabled = False
ParentCtl3D = False
TabOrder = 1
end
end
object Group_js: TGroupBox
Left = 372
Top = 104
Width = 141
Height = 216
Caption = #32467#31639#25910#36153
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
object Label10: TLabel
Left = 16
Top = 24
Width = 60
Height = 12
Caption = #27424#27454'('#20803')'#65306
end
object Label11: TLabel
Left = 16
Top = 64
Width = 84
Height = 12
Caption = #24212#25910#37329#39069'('#20803')'#65306
end
object Label12: TLabel
Left = 17
Top = 100
Width = 84
Height = 12
Caption = #23454#25910#37329#39069'('#20803')'#65306
end
object Label13: TLabel
Left = 17
Top = 137
Width = 84
Height = 12
Caption = #36864#36824#25276#37329'('#20803')'#65306
end
object e_qk: TEdit
Left = 16
Top = 40
Width = 113
Height = 18
BiDiMode = bdLeftToRight
Color = cl3DLight
Ctl3D = False
Enabled = False
ParentBiDiMode = False
ParentCtl3D = False
TabOrder = 0
end
object e_ys: TEdit
Left = 16
Top = 80
Width = 113
Height = 18
Color = cl3DLight
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 1
end
object e_ss: TEdit
Left = 17
Top = 116
Width = 113
Height = 18
Ctl3D = False
ParentCtl3D = False
TabOrder = 2
OnExit = e_ssExit
OnKeyPress = e_ssKeyPress
end
object e_thyj: TEdit
Left = 17
Top = 153
Width = 113
Height = 18
Ctl3D = False
ParentCtl3D = False
TabOrder = 3
OnExit = e_thyjExit
OnKeyPress = e_thyjKeyPress
end
object BitBtn1: TBitBtn
Left = 32
Top = 184
Width = 75
Height = 25
Caption = #32467#31639
TabOrder = 4
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500000000055
555557777777775F55550FFFFFFFFF0555557F5555555F7FFF5F0FEEEEEE0000
05007F555555777775770FFFFFF0BFBFB00E7F5F5557FFF557770F0EEEE000FB
FB0E7F75FF57775555770FF00F0FBFBFBF0E7F57757FFFF555770FE0B00000FB
FB0E7F575777775555770FFF0FBFBFBFBF0E7F5575FFFFFFF5770FEEE0000000
FB0E7F555777777755770FFFFF0B00BFB0007F55557577FFF7770FEEEEE0B000
05557F555557577775550FFFFFFF0B0555557FF5F5F57575F55500F0F0F0F0B0
555577F7F7F7F7F75F5550707070700B055557F7F7F7F7757FF5507070707050
9055575757575757775505050505055505557575757575557555}
NumGlyphs = 2
end
end
object Group_hz: TGroupBox
Left = 8
Top = 104
Width = 361
Height = 216
Caption = #26126#32454#21015#34920
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
object Label7: TLabel
Left = 9
Top = 32
Width = 60
Height = 12
Caption = #24433#30879#32534#21495#65306
end
object DBGrid1: TDBGrid
Left = 4
Top = 56
Width = 349
Height = 151
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
ReadOnly = True
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clBlue
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDrawColumnCell = DBGrid1DrawColumnCell
Columns = <
item
Expanded = False
FieldName = #21517#31216
Title.Alignment = taCenter
Title.Caption = #24433#30879#21517#31216
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -12
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 107
Visible = True
end
item
Expanded = False
FieldName = #32534#21495
Title.Alignment = taCenter
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -12
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 97
Visible = True
end
item
Expanded = False
FieldName = #20986#31199#26085#26399
Title.Alignment = taCenter
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -12
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 65
Visible = True
end
item
Expanded = False
FieldName = #20986#31199#21333#20215
Title.Alignment = taCenter
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -12
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 60
Visible = True
end>
end
object e_vcdid: TEdit
Left = 67
Top = 27
Width = 177
Height = 20
TabOrder = 0
OnExit = e_vcdidExit
OnKeyDown = e_vcdidKeyDown
end
end
object DataSource1: TDataSource
DataSet = dm.ADO_czbtmp
Left = 224
Top = 212
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -