📄 sequence_price.dfm
字号:
object Form_seq_price: TForm_seq_price
Left = 203
Top = 179
BorderStyle = bsDialog
Caption = #21508#35746#21333#25152#38656#24037#24207#21450#24037#20215#31649#29702
ClientHeight = 453
ClientWidth = 688
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 688
Height = 414
ActivePage = TabSheet1
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnChange = PageControl1Change
OnChanging = PageControl1Changing
object TabSheet1: TTabSheet
Caption = #24037#24207#21450#24037#20215#20449#24687#21015#34920
ParentShowHint = False
ShowHint = False
object DBGrid1: TDBGrid
Left = 0
Top = 73
Width = 680
Height = 313
Align = alClient
DataSource = DS_price
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
ButtonStyle = cbsNone
Expanded = False
FieldName = 'ord_id'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -15
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end
item
ButtonStyle = cbsNone
Expanded = False
FieldName = 'cust_name'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -15
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end
item
ButtonStyle = cbsNone
Expanded = False
FieldName = 'costume_name'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -15
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end
item
ButtonStyle = cbsNone
Expanded = False
FieldName = 'seq_name'
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -15
Title.Font.Name = #23435#20307
Title.Font.Style = []
Visible = True
end
item
ButtonStyle = cbsNone
Expanded = False
FieldName = 'seq_price'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -15
Title.Font.Name = #23435#20307
Title.Font.Style = []
Width = 151
Visible = True
end>
end
object Panel3: TPanel
Left = 0
Top = 0
Width = 680
Height = 73
Hint = #22312#35746#21333#25209#21495#25991#26412#26694#20869#36755#20837#35746#21333#25209#21495#20877#25353#22238#36710#38190#65292#20197#20415#24471#21040#23545#24212#35746#21333#30340#24037#24207#20449#24687
Align = alTop
BevelOuter = bvNone
ParentColor = True
ParentShowHint = False
ShowHint = True
TabOrder = 1
object Label20: TLabel
Left = 8
Top = 47
Width = 83
Height = 15
Caption = #23458#20379#24037#20215'/'#20214
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 304
Top = 47
Width = 143
Height = 15
Caption = #21512#35745#25152#26377#24037#24207#24037#20215'/'#20214
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label22: TLabel
Left = 218
Top = 45
Width = 20
Height = 19
Caption = #20803
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 581
Top = 45
Width = 20
Height = 19
Caption = #20803
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel4: TPanel
Left = 0
Top = 9
Width = 680
Height = 25
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
object Label4: TLabel
Left = 304
Top = 5
Width = 338
Height = 15
Caption = #65288' '#35831#36873#25321#35746#21333#25209#21495#20197#26174#31034#23545#24212#30340#24037#24207#21450#24037#20215#21015#34920#65289
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Panel7: TPanel
Left = 0
Top = 0
Width = 81
Height = 25
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object Label11: TLabel
Left = 0
Top = 6
Width = 81
Height = 19
Align = alClient
Caption = ' '#35746#21333#25209#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Panel8: TPanel
Left = 0
Top = 0
Width = 81
Height = 6
Align = alTop
BevelOuter = bvNone
TabOrder = 0
end
end
object DBLookupComboBox1: TComboBox
Left = 96
Top = 0
Width = 193
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 16
ParentFont = False
TabOrder = 1
OnChange = DBLookupComboBox1Change
OnKeyPress = DBLookupComboBox1KeyPress
end
end
object Panel6: TPanel
Left = 0
Top = 0
Width = 680
Height = 9
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 3
end
object Edit1: TEdit
Left = 96
Top = 41
Width = 121
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentColor = True
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = #65509'0.00'
end
object Edit2: TEdit
Left = 459
Top = 41
Width = 121
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentColor = True
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = #65509'0.00'
end
end
end
object TabSheet2: TTabSheet
Caption = #24037#24207#21450#24037#20215#35814#32454#20449#24687
ImageIndex = 1
object Panel1: TPanel
Left = 0
Top = 0
Width = 680
Height = 386
Align = alClient
BevelInner = bvLowered
TabOrder = 0
object Panel5: TPanel
Left = 2
Top = 2
Width = 676
Height = 142
Align = alClient
BevelOuter = bvNone
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object Label9: TLabel
Left = 16
Top = 92
Width = 64
Height = 16
Caption = #24037#24207#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 296
Top = 92
Width = 64
Height = 16
Caption = #21152#24037#24037#20215
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 16
Top = 38
Width = 64
Height = 16
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -