📄 unit_production.dfm
字号:
object fmProductionMgr: TfmProductionMgr
Left = 165
Top = 132
Width = 735
Height = 559
Caption = #20316#21697#31649#29702
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 61
Width = 727
Height = 430
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object Panel3: TPanel
Left = 0
Top = 0
Width = 375
Height = 430
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object StringGrid1: TStringGrid
Left = 0
Top = 0
Width = 375
Height = 430
Align = alClient
ColCount = 6
DefaultRowHeight = 20
FixedCols = 0
RowCount = 2
TabOrder = 0
OnClick = StringGrid1Click
ColWidths = (
93
99
95
344
4
4)
end
end
object Panel4: TPanel
Left = 375
Top = 0
Width = 352
Height = 430
Align = alRight
BevelOuter = bvNone
TabOrder = 1
object Label1: TLabel
Left = 48
Top = 22
Width = 48
Height = 13
Caption = #20316#21697#21517#31216
end
object Label2: TLabel
Left = 48
Top = 65
Width = 48
Height = 13
Caption = #20316#21697#20316#32773
end
object Label3: TLabel
Left = 48
Top = 104
Width = 48
Height = 13
Caption = #20316#21697#20215#26684
end
object Label4: TLabel
Left = 48
Top = 336
Width = 48
Height = 13
Caption = #20316#21697#25551#36848
end
object Image1: TImage
Left = 48
Top = 168
Width = 265
Height = 145
end
object Label5: TLabel
Left = 48
Top = 144
Width = 48
Height = 13
Caption = #20316#21697#26174#31034
end
object Label6: TLabel
Left = 304
Top = 104
Width = 12
Height = 13
Caption = #20803
end
object Edt_Name: TEdit
Left = 104
Top = 19
Width = 210
Height = 21
TabOrder = 0
end
object Mmo_Des: TMemo
Left = 47
Top = 356
Width = 266
Height = 157
TabOrder = 1
end
object CB_AuthorCode: TComboBox
Left = 192
Top = 56
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 3
Visible = False
end
object CB_AuthorName: TComboBox
Left = 104
Top = 56
Width = 209
Height = 21
Style = csDropDownList
Enabled = False
ItemHeight = 13
TabOrder = 2
OnChange = ComboBox1Change
end
object Button1: TButton
Left = 120
Top = 136
Width = 75
Height = 25
Caption = 'Button1'
TabOrder = 4
OnClick = Button1Click
end
object Edt_Price: TSpinEdit
Left = 104
Top = 96
Width = 185
Height = 22
MaxValue = 0
MinValue = 0
TabOrder = 5
Value = 0
end
end
end
object Panel2: TPanel
Left = 0
Top = 491
Width = 727
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object BitBtn1: TBitBtn
Left = 96
Top = 8
Width = 75
Height = 25
Caption = #22686#21152
TabOrder = 0
end
object BitBtn2: TBitBtn
Left = 184
Top = 8
Width = 75
Height = 25
Caption = #20462#25913
TabOrder = 1
end
object BitBtn3: TBitBtn
Left = 272
Top = 8
Width = 75
Height = 25
Caption = #21024#38500
TabOrder = 2
end
object BitBtn5: TBitBtn
Left = 480
Top = 8
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 3
end
object BitBtn6: TBitBtn
Left = 568
Top = 8
Width = 75
Height = 25
Caption = #21462#28040
TabOrder = 4
end
end
object Panel5: TPanel
Left = 0
Top = 0
Width = 727
Height = 61
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object GroupBox1: TGroupBox
Left = 1
Top = 2
Width = 584
Height = 51
Caption = #26597#35810#26465#20214
TabOrder = 0
object RadioButton1: TRadioButton
Left = 11
Top = 22
Width = 86
Height = 17
Caption = #20316#21697#21517#31216
Checked = True
TabOrder = 0
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 107
Top = 22
Width = 86
Height = 17
Caption = #20316#21697#20316#32773
TabOrder = 1
OnClick = RadioButton2Click
end
object RadioButton3: TRadioButton
Left = 195
Top = 22
Width = 86
Height = 17
Caption = #20316#21697#20215#26684
TabOrder = 2
OnClick = RadioButton3Click
end
object Notebook1: TNotebook
Left = 275
Top = 10
Width = 302
Height = 36
PageIndex = 1
TabOrder = 3
object TPage
Left = 0
Top = 0
Caption = 'production'
object Edt_ProQry: TEdit
Left = 16
Top = 8
Width = 241
Height = 21
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Author'
object ComboBox2: TComboBox
Left = 104
Top = 8
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
Visible = False
end
object ComboBox1: TComboBox
Left = 40
Top = 8
Width = 153
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = ComboBox1Change
end
end
object TPage
Left = 0
Top = 0
Caption = 'Price'
object RadioGroup1: TRadioGroup
Left = 26
Top = 0
Width = 141
Height = 31
Columns = 2
ItemIndex = 0
Items.Strings = (
#22823#20110#31561#20110
#23567#20110#31561#20110)
TabOrder = 0
end
object SpinEdit1: TSpinEdit
Left = 176
Top = 8
Width = 81
Height = 22
MaxValue = 0
MinValue = 0
TabOrder = 1
Value = 0
end
end
end
end
object BitBtn4: TBitBtn
Left = 600
Top = 16
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 1
OnClick = BitBtn4Click
end
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=D:\'#12304'0' +
'2'#12305#31243#24207'\'#12304'99'#12305'TEST\'#34892#20581#32654#26415#39302#31649#29702#31995#32479'\db\database.mdb;Mode=Share Deny None;Ext' +
'ended Properties="";Persist Security Info=False;Jet OLEDB:System' +
' database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Passw' +
'ord="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1' +
';Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Trans' +
'actions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create Sy' +
'stem Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:D' +
'on'#39't Copy Locale on Compact=False;Jet OLEDB:Compact Without Repl' +
'ica Repair=False;Jet OLEDB:SFP=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 120
Top = 184
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#20316#21697#34920)
Left = 160
Top = 184
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -