📄 mplan.dfm
字号:
inherited f_mplan: Tf_mplan
Left = -125
Top = 86
Width = 808
Height = 608
Caption = #35745#21010#31649#29702
FormStyle = fsMDIChild
OldCreateOrder = True
Position = poScreenCenter
Visible = True
PixelsPerInch = 96
TextHeight = 13
inherited palDown: TPanel
Top = 572
Width = 800
inherited imgRightDown: TImage
Left = 790
end
inherited imgDownMin: TImage
Width = 780
end
end
inherited palLeft: TPanel
Height = 507
inherited imgLeft: TImage
Height = 507
end
end
inherited palRight: TPanel
Left = 785
Height = 507
inherited imgRight: TImage
Height = 507
end
end
inherited palToolbar: TPanel
Width = 800
inherited tiLocate: TTradeImg
OnClick = tiLocateClick
end
inherited tiLast: TTradeImg
OnClick = tiLastClick
end
inherited tiNext: TTradeImg
OnClick = tiNextClick
end
inherited tiPrior: TTradeImg
OnClick = tiPriorClick
end
inherited tiFirst: TTradeImg
OnClick = tiFirstClick
end
inherited ticancel: TTradeImg
Left = 152
Width = 23
end
end
object Panel1: TPanel
Left = 10
Top = 65
Width = 775
Height = 507
Align = alClient
BevelOuter = bvNone
Color = 13619151
TabOrder = 4
object Label7: TLabel
Left = 0
Top = 200
Width = 72
Height = 13
Caption = #29289#26009#38656#27714#34920#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 8
Top = 357
Width = 72
Height = 13
Caption = #29289#26009#38656#27714#34920#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 8
Top = 328
Width = 64
Height = 13
AutoSize = False
Caption = #36816#31639#32467#26524
end
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 775
Height = 168
Align = alTop
Color = 13619151
ParentColor = False
TabOrder = 0
object Label1: TLabel
Left = 56
Top = 16
Width = 60
Height = 13
Caption = #20135#21697#32534#21495#65306
end
object Label4: TLabel
Left = 224
Top = 64
Width = 60
Height = 13
Caption = #24635#20986#20135#37327#65306
FocusControl = DBEdit4
end
object Label5: TLabel
Left = 224
Top = 16
Width = 60
Height = 13
Caption = #20986#20135#26102#38388#65306
FocusControl = DBEdit5
end
object Label2: TLabel
Left = 56
Top = 64
Width = 60
Height = 13
Caption = #20135#21697#21517#31216#65306
end
object SpeedButton1: TSpeedButton
Left = 392
Top = 32
Width = 23
Height = 22
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
77037F3377777773337F088887707888870373F3337773F33373307880707088
7033373FF737F73FF733337003303300733333777337FF777333333333000333
3333333333777333333333333333333333333333333333333333}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object Label3: TLabel
Left = 16
Top = 152
Width = 60
Height = 13
AutoSize = False
Caption = #20027#35745#21010
end
object DBEdit4: TDBEdit
Left = 224
Top = 80
Width = 134
Height = 21
Color = clSilver
DataField = 'Produce_Amount'
DataSource = dm.d_mplan
ReadOnly = True
TabOrder = 0
end
object DBEdit5: TDBEdit
Left = 224
Top = 32
Width = 153
Height = 21
Color = clSilver
DataField = 'Produce_Time'
DataSource = dm.d_mplan
ReadOnly = True
TabOrder = 1
end
object BitBtn1: TBitBtn
Left = 488
Top = 80
Width = 81
Height = 49
Caption = 'MRP'#36816#31639
TabOrder = 2
OnClick = BitBtn1Click
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 56
Top = 32
Width = 145
Height = 21
Color = clSilver
DataField = 'Produce_ID'
DataSource = dm.d_mplan
KeyField = 'Produce_ID'
ListField = 'Produce_ID'
ListSource = dm.d_list
TabOrder = 3
end
object DBLookupComboBox2: TDBLookupComboBox
Left = 56
Top = 80
Width = 145
Height = 21
Color = clSilver
DataField = 'Produce_Name'
DataSource = dm.d_mplan
KeyField = 'produce_name'
ListField = 'produce_name'
ListSource = dm.d_list
TabOrder = 4
end
object Button1: TButton
Left = 488
Top = 24
Width = 75
Height = 25
Caption = #21442#32771#35745#21010
TabOrder = 5
OnClick = Button1Click
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 168
Width = 775
Height = 145
Align = alTop
DataSource = dm.d_mplan
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Produce_ID'
Title.Caption = #20135#21697#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'Produce_Name'
Title.Caption = #21517#31216
Visible = True
end
item
Expanded = False
FieldName = 'Produce_Amount'
Title.Caption = #24635#20986#20135#37327
Visible = True
end
item
Expanded = False
FieldName = 'produce_time'
Title.Caption = #20986#20135#26102#38388
Visible = True
end>
end
object DBGrid2: TDBGrid
Left = 0
Top = 344
Width = 775
Height = 163
Align = alBottom
DataSource = dm.d_needstro
ReadOnly = True
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'BOMc_ID'
Title.Caption = #29289#26009#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'BOMC_Name'
Title.Caption = #29289#26009#21517#31216
Visible = True
end
item
Expanded = False
FieldName = 'tall'
Title.Caption = #29289#26009#24635#37327
Visible = True
end
item
Expanded = False
FieldName = 'needstro'
Title.Caption = #25152#38656#29289#37327
Visible = True
end>
end
end
object ADOCommand1: TADOCommand
Connection = dm.ADOConnection1
Parameters = <>
Left = 608
Top = 153
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -