unit16.~dfm
来自「应对服装行业的生产成本控制系统」· ~DFM 代码 · 共 224 行
~DFM
224 行
object Form16: TForm16
Left = 258
Top = 183
BorderIcons = []
BorderStyle = bsDialog
Caption = #12304#31995#32479#26085#24535#12305
ClientHeight = 317
ClientWidth = 505
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
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 505
Height = 276
Align = alClient
BevelInner = bvLowered
BevelOuter = bvLowered
BorderStyle = bsSingle
TabOrder = 0
object Label1: TLabel
Left = 19
Top = 12
Width = 47
Height = 17
AutoSize = False
Caption = #25805#20316#21592#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clFuchsia
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 68
Top = 8
Width = 93
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyField = 'czyxm'
ListField = 'czyxm'
ListSource = DataModule1.DataSource8
ParentFont = False
TabOrder = 0
OnClick = DBLookupComboBox1Click
end
object Panel2: TPanel
Left = 2
Top = 32
Width = 495
Height = 238
BevelOuter = bvNone
TabOrder = 1
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 495
Height = 238
Align = alClient
DataSource = DataModule1.DataSource10
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'czy'
Title.Alignment = taCenter
Title.Caption = #25805#20316#21592
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 = 65
Visible = True
end
item
Expanded = False
FieldName = 'shij'
Title.Alignment = taCenter
Title.Caption = #20107#20214
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 = 200
Visible = True
end
item
Expanded = False
FieldName = 'jrrqsj'
Title.Alignment = taCenter
Title.Caption = #36827#20837#26102#38388
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 = 100
Visible = True
end
item
Expanded = False
FieldName = 'tcrqsj'
Title.Alignment = taCenter
Title.Caption = #36864#20986#26102#38388
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 = 100
Visible = True
end>
end
end
end
object Panel3: TPanel
Left = 0
Top = 276
Width = 505
Height = 41
Align = alBottom
BevelOuter = bvNone
BorderStyle = bsSingle
TabOrder = 1
object SpeedButton2: TSpeedButton
Left = 301
Top = 5
Width = 82
Height = 27
Caption = #36820' '#22238
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADA0ADADA
DADAADADA00DADADADADDADA0A007ADADADAADA0ADAD707DADADDAD0DADADA07
DADAADAD0D007DA0ADADDADAD00A70DA0ADAADADAD0DAD0D0DADDADADADADAD0
0ADAADADADADADA00DADDADADADAD70A0ADAADADADA707AD0DADDADA0007DAD0
DADAADAD0DADA707ADADDADA0AD7077ADADAADAD00077DADADAD}
ParentFont = False
OnClick = SpeedButton2Click
end
object SpeedButton1: TSpeedButton
Left = 206
Top = 6
Width = 82
Height = 27
Caption = #28165' '#38500
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
DADAAD77777777777777D000000000000007A0FBFBFBFB00FB0770BFBFBFBF08
0F0710FBFBFBFB0B800711BFBF71BF000007717BF717FBFBFB07D117B11FBFBF
BF07A71111FBFBFBFB07D7111FBFBFBFBF07711117000000000D117A117ADADA
DADAADADA117ADADADADDADADA117ADADADAADADADADADADADAD}
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton3: TSpeedButton
Left = 109
Top = 6
Width = 82
Height = 27
Caption = #25171' '#21360
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000010000000000000000084
840084848400C6C6C6000000FF0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00333333333333
3333330000000000033330313131313010330000000000000103013131355531
0003031313122213010300000000000001100131313131301010300000000003
0100330666666660301044446000002203033333066666663033444444000002
2203333333066666633044444444000000003333333333333333}
ParentFont = False
OnClick = SpeedButton3Click
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?