📄 p_zd.dfm
字号:
object f_zd: Tf_zd
Left = 184
Top = 155
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #25968#25454#23383#20856#32500#25252
ClientHeight = 308
ClientWidth = 517
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poScreenCenter
Visible = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object page: TPageControl
Left = 8
Top = 8
Width = 501
Height = 293
ActivePage = TabSheet2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabIndex = 1
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #35838#31243
object Bevel1: TBevel
Left = 8
Top = 8
Width = 477
Height = 245
Shape = bsFrame
Style = bsRaised
end
object Label1: TLabel
Left = 288
Top = 28
Width = 89
Height = 16
Caption = #35838#31243#21517#31216' '#65306' '
end
object DBGrid1: TDBGrid
Left = 12
Top = 12
Width = 253
Height = 237
Ctl3D = True
DataSource = dm.DS_KeCheng
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ParentCtl3D = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
Columns = <
item
Expanded = False
FieldName = 'KCM'
Title.Alignment = taCenter
Title.Caption = #35838#31243#21517#31216
Title.Color = clAqua
Visible = True
end>
end
object Edit1: TEdit
Left = 288
Top = 60
Width = 173
Height = 24
TabOrder = 1
end
object b_add: TBitBtn
Left = 288
Top = 124
Width = 75
Height = 25
Caption = #22686#21152
TabOrder = 2
OnClick = b_addClick
Glyph.Data = {
F2010000424DF201000000000000760000002800000024000000130000000100
0400000000007C01000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333334433333
3333333333388F3333333333000033334224333333333333338338F333333333
0000333422224333333333333833338F33333333000033422222243333333333
83333338F3333333000034222A22224333333338F33F33338F33333300003222
A2A2224333333338F383F3338F33333300003A2A222A222433333338F8333F33
38F33333000034A22222A22243333338833333F3338F333300004222A2222A22
2433338F338F333F3338F3330000222A3A2224A22243338F3838F338F3338F33
0000A2A333A2224A2224338F83338F338F3338F300003A33333A2224A2224338
333338F338F3338F000033333333A2224A2243333333338F338F338F00003333
33333A2224A2233333333338F338F83300003333333333A2224A333333333333
8F338F33000033333333333A222433333333333338F338F30000333333333333
A224333333333333338F38F300003333333333333A223333333333333338F8F3
000033333333333333A3333333333333333383330000}
NumGlyphs = 2
end
object b_edit: TBitBtn
Left = 388
Top = 124
Width = 75
Height = 25
Caption = #20462#25913
TabOrder = 3
OnClick = b_editClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
33333333333F8888883F33330000324334222222443333388F3833333388F333
000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
3338888300003AAAAAAA33333333333888888833333333330000333333333333
333333333333333333FFFFFF000033333333333344444433FFFF333333888888
00003A444333333A22222438888F333338F3333800003A2243333333A2222438
F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object b_del: TBitBtn
Left = 288
Top = 184
Width = 75
Height = 25
Cancel = True
Caption = #21024#38500
TabOrder = 4
OnClick = b_delClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object b_close: TBitBtn
Left = 388
Top = 184
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 5
OnClick = b_closeClick
Kind = bkClose
end
end
object TabSheet2: TTabSheet
Caption = #25945#24072
ImageIndex = 1
object Bevel2: TBevel
Left = 8
Top = 8
Width = 477
Height = 245
Shape = bsFrame
Style = bsRaised
end
object Label2: TLabel
Left = 288
Top = 28
Width = 89
Height = 16
Caption = #25945#24072#22995#21517' '#65306' '
end
object DBGrid2: TDBGrid
Left = 12
Top = 12
Width = 253
Height = 237
Ctl3D = True
DataSource = dm.DS_JiaoShi
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ParentCtl3D = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid2CellClick
Columns = <
item
Expanded = False
FieldName = 'JSM'
Title.Alignment = taCenter
Title.Caption = #25945#24072#22995#21517
Title.Color = clAqua
Visible = True
end>
end
object Edit2: TEdit
Left = 288
Top = 60
Width = 173
Height = 24
TabOrder = 1
end
object BitBtn1: TBitBtn
Left = 288
Top = 124
Width = 75
Height = 25
Caption = #22686#21152
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
F2010000424DF201000000000000760000002800000024000000130000000100
0400000000007C01000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333334433333
3333333333388F3333333333000033334224333333333333338338F333333333
0000333422224333333333333833338F33333333000033422222243333333333
83333338F3333333000034222A22224333333338F33F33338F33333300003222
A2A2224333333338F383F3338F33333300003A2A222A222433333338F8333F33
38F33333000034A22222A22243333338833333F3338F333300004222A2222A22
2433338F338F333F3338F3330000222A3A2224A22243338F3838F338F3338F33
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -