📄 order.dfm
字号:
object OrderForm: TOrderForm
Left = 244
Top = 106
Width = 586
Height = 561
ActiveControl = AboutButton
Caption = #37319#36141#35746#21333
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnShow = FormShow
DesignSize = (
578
534)
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 24
Width = 578
Height = 161
Align = alTop
BevelOuter = bvNone
TabOrder = 0
DesignSize = (
578
161)
object Label1: TLabel
Left = 8
Top = 128
Width = 565
Height = 5
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Color = clBtnShadow
ParentColor = False
end
object Label2: TLabel
Left = 568
Top = 32
Width = 5
Height = 97
Anchors = [akTop, akRight, akBottom]
AutoSize = False
Color = clBtnShadow
ParentColor = False
end
object Label10: TLabel
Left = 8
Top = 11
Width = 42
Height = 12
Caption = #20379#24212#21830':'
end
object Label11: TLabel
Left = 8
Top = 141
Width = 30
Height = 12
Caption = #22791#27880':'
FocusControl = DBEdit8
end
object Panel3: TPanel
Left = 8
Top = 32
Width = 561
Height = 97
Anchors = [akLeft, akTop, akRight, akBottom]
BevelOuter = bvNone
BorderStyle = bsSingle
Color = clWindow
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
DesignSize = (
559
95)
object Label3: TLabel
Left = 368
Top = 8
Width = 73
Height = 13
Alignment = taCenter
Anchors = [akTop, akRight]
AutoSize = False
Caption = #24320#21333#26085#26399
Color = clNavy
FocusControl = DBEdit1
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label4: TLabel
Left = 448
Top = 8
Width = 105
Height = 13
Alignment = taCenter
Anchors = [akTop, akRight]
AutoSize = False
Caption = #21333#25454#32534#21495
Color = clNavy
FocusControl = DBEdit2
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label5: TLabel
Left = 472
Top = 56
Width = 81
Height = 13
Alignment = taCenter
Anchors = [akTop, akRight]
AutoSize = False
Caption = #36865#36135#26085#26399
Color = clNavy
FocusControl = DBEdit3
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label6: TLabel
Left = 376
Top = 56
Width = 89
Height = 13
Alignment = taCenter
Anchors = [akTop, akRight]
AutoSize = False
Caption = #21512#21516#21495
Color = clNavy
FocusControl = DBEdit4
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label7: TLabel
Left = 192
Top = 56
Width = 81
Height = 13
Alignment = taCenter
Anchors = [akTop, akRight]
AutoSize = False
Caption = #20184#27454#26399#38480
Color = clNavy
FocusControl = DBEdit5
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label8: TLabel
Left = 280
Top = 56
Width = 89
Height = 13
Alignment = taCenter
Anchors = [akTop, akRight]
AutoSize = False
Caption = #21457#31080#31867#22411
Color = clNavy
FocusControl = DBEdit6
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label9: TLabel
Left = 16
Top = 8
Width = 84
Height = 20
Caption = #37319#36141#35746#21333
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object DBEdit1: TDBEdit
Left = 368
Top = 21
Width = 73
Height = 18
Anchors = [akTop, akRight]
DataField = 'BILLDATE'
DataSource = DemoDM.P_OrderDSR
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 448
Top = 21
Width = 105
Height = 18
Anchors = [akTop, akRight]
DataField = 'BILLCODE'
DataSource = DemoDM.P_OrderDSR
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 472
Top = 69
Width = 81
Height = 18
Anchors = [akTop, akRight]
DataField = 'RCVDATE'
DataSource = DemoDM.P_OrderDSR
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 376
Top = 69
Width = 89
Height = 18
Anchors = [akTop, akRight]
DataField = 'CNTCTNO'
DataSource = DemoDM.P_OrderDSR
TabOrder = 3
end
object DBEdit5: TDBEdit
Left = 192
Top = 69
Width = 81
Height = 18
Anchors = [akTop, akRight]
DataField = 'Term'
DataSource = DemoDM.P_OrderDSR
TabOrder = 4
end
object DBEdit6: TDBEdit
Left = 280
Top = 69
Width = 89
Height = 18
Anchors = [akTop, akRight]
DataField = 'InvoiceType'
DataSource = DemoDM.P_OrderDSR
TabOrder = 5
end
end
object DBEdit8: TDBEdit
Left = 40
Top = 138
Width = 329
Height = 20
DataField = 'REMARK'
DataSource = DemoDM.P_OrderDSR
TabOrder = 1
end
object VendorLCB: TQLDBLookupComboBox
Left = 56
Top = 8
Width = 177
Height = 20
DataField = 'VendorName'
DataSource = DemoDM.P_OrderDSR
DropDownRows = 15
TabOrder = 2
AutoDropDown = False
ButtonHeight = 22
OnButtonClick = VendorLCBButtonClick
SearchMode = smLocate
SearchType = stAuto
end
end
object OrderDDbg: TQLDBGrid
Left = 8
Top = 192
Width = 563
Height = 201
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = OrderDDsr
Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
AlternateColor = clWindow
CurrencyView.CurrencyTitle = True
CurrencyView.DigitAlignment = taCenter
CurrencyView.DigitWidth = 9
CurrencyView.IntegerSeparateColor = clRed
CurrencyView.SeparateColor = clSilver
CurrencyView.ThousandSeparateColor = clGray
CurrencyView.TitleLines = False
FooterColor = 13296074
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
FooterRowCount = 1
OptionsEx = [dgEnterToTab, dgAllowDelete, dgAllowInsert, dgControlArrowKeys, dgCurrencyView]
Columns = <
item
Expanded = False
FieldName = 'Goods'
Width = 150
Visible = True
ControlType = ctCustomControl
CustomControl = GoodsLCB
Footer.Value = #21512#35745#65306
Footer.ValueType = fvtStaticText
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -