📄 cpdw.~dfm
字号:
object Frmcpdw: TFrmcpdw
Left = 334
Top = 207
BorderIcons = []
BorderStyle = bsDialog
Caption = #12304#20135#21697#21333#20301#12305
ClientHeight = 224
ClientWidth = 503
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 503
Height = 224
Align = alClient
BorderStyle = bsSingle
TabOrder = 0
object GroupBox1: TGroupBox
Left = 6
Top = 5
Width = 489
Height = 169
Caption = #20135#21697#21333#20301#24405#20837
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object DBGrid1: TDBGrid
Left = 265
Top = 13
Width = 209
Height = 146
DataSource = DataModule1.DataSource6
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlue
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Color = clCream
Expanded = False
FieldName = 'cpdw'
Font.Charset = DEFAULT_CHARSET
Font.Color = clFuchsia
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Title.Alignment = taCenter
Title.Caption = #20135#21697#21333#20301
Title.Color = clMoneyGreen
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clTeal
Title.Font.Height = -11
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
Width = 174
Visible = True
end>
end
object GroupBox2: TGroupBox
Left = 14
Top = 14
Width = 241
Height = 141
TabOrder = 1
object Label2: TLabel
Left = 23
Top = 57
Width = 60
Height = 13
Caption = #21333#20301#21517#31216#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Edit2: TDBEdit
Left = 88
Top = 55
Width = 130
Height = 21
DataField = 'cpdw'
DataSource = DataModule1.DataSource6
Enabled = False
TabOrder = 0
OnExit = Edit2Exit
OnKeyPress = Edit2KeyPress
end
end
end
object Panel3: TPanel
Left = 1
Top = 178
Width = 497
Height = 41
Align = alBottom
BorderStyle = bsSingle
TabOrder = 1
object bnew: TBitBtn
Left = 19
Top = 8
Width = 75
Height = 25
Caption = #26032' '#22686
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = bnewClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
DADAADADADADADADA0ADDADADADADADAD0DAADADADADADA00000DADADADADADA
D0DA000000000000A0AD0FFFFFFFFFF0DADA0F00F00F00F0ADAD0FFFFFFFFFF0
DADA0444444444444DADD4FFFFFFFFFF4ADAA4F00F00F00F4DADD4FFFFFFFFFF
4ADAA444444444444DADD484484484484ADAA444444444444DAD}
end
object brepair: TBitBtn
Left = 95
Top = 8
Width = 75
Height = 25
Caption = #20462' '#25913
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = repearClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
DADAADADADADADADADADDADADADADADADADAA70000007DADADADD088888800DA
DADAA0888888070DADADD70888880770DADAAD08F8F8F0770DADDAD08F8F8F07
70DAADAD08F8F8F0777DDADAD08F8F8F070AADADAD08F8F8F70DDADADAD08F8F
880AADADADAD7000077DDADADADADADADADAADADADADADADADAD}
end
object bdelete: TBitBtn
Left = 172
Top = 8
Width = 75
Height = 25
Caption = #21024' '#38500
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = bdeleteClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
DADAADADADADA1ADADADDADADADA11DADAD1ADADADAD111DAD1DDADADADAD11A
D11A00000000000115AD0888888888511ADA08008008081511AD08888888811A
D1150444444514444D51D4FFFFF15FFF4ADAA4F00F00F00F4DADD4FFFFFFFFFF
4ADAA444444444444DADD484484484484ADAA444444444444DAD}
end
object bcancel: TBitBtn
Left = 249
Top = 8
Width = 75
Height = 25
Caption = #21462' '#28040
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = bcancelClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777777777777
71F77777777777777EF77771F77777777777777EF7777777777777991F777777
9F777788EF7777778F7777191F777771F77777E8EF77777EF777777199F77791
F777777E88F7778EF7777777191F719F77777777E8EF7E8F77777777719199F7
777777777E8E88F77777777777919F7777777777778E8F7777777777791911F7
7777777778E8EEF777777777191F79F777777777E8EF78F77777779191F77719
F777778E8EF777E8F77771919F7777719F777E8E8F77777E8F77791F77777777
19F778EF77777777E8F777777777777777777777777777777777}
NumGlyphs = 2
end
object bsave: TBitBtn
Left = 326
Top = 8
Width = 75
Height = 25
Caption = #20445' '#23384
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = bsaveClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F7330099999999900333777777777777733}
NumGlyphs = 2
end
object breturn: TBitBtn
Left = 403
Top = 8
Width = 75
Height = 25
Caption = #36820' '#22238
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = breturnClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADA0ADADA
DADAADADA00DADADADADDADA0A007ADADADAADA0ADAD707DADADDAD0DADADA07
DADAADAD0D007DA0ADADDADAD00A70DA0ADAADADAD0DAD0D0DADDADADADADAD0
0ADAADADADADADA00DADDADADADAD70A0ADAADADADA707AD0DADDADA0007DAD0
DADAADAD0DADA707ADADDADA0AD7077ADADAADAD00077DADADAD}
end
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -