?? unit_production.~dfm
字號:
object fmProductionMgr: TfmProductionMgr
Left = 237
Top = 127
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
350
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 = 137
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 = CB_AuthorNameChange
end
object Edt_Price: TSpinEdit
Left = 104
Top = 96
Width = 185
Height = 22
MaxValue = 0
MinValue = 0
TabOrder = 4
Value = 0
end
object BitBtn_sel: TBitBtn
Left = 104
Top = 136
Width = 75
Height = 25
Caption = #36873#25321#22270#29255
TabOrder = 5
OnClick = BitBtn_selClick
end
end
end
object Panel2: TPanel
Left = 0
Top = 491
Width = 727
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object BitBtn_new: TBitBtn
Left = 96
Top = 8
Width = 75
Height = 25
Caption = #22686#21152
TabOrder = 0
OnClick = BitBtn_newClick
end
object BitBtn_edit: TBitBtn
Left = 184
Top = 8
Width = 75
Height = 25
Caption = #20462#25913
TabOrder = 1
OnClick = BitBtn_editClick
end
object BitBtn_del: TBitBtn
Left = 272
Top = 8
Width = 75
Height = 25
Caption = #21024#38500
TabOrder = 2
OnClick = BitBtn_delClick
end
object BitBtn_ok: TBitBtn
Left = 480
Top = 8
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 3
OnClick = BitBtn_okClick
end
object BitBtn_cancel: TBitBtn
Left = 568
Top = 8
Width = 75
Height = 25
Caption = #21462#28040
TabOrder = 4
OnClick = BitBtn_cancelClick
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
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 BitBtn_qry: TBitBtn
Left = 600
Top = 16
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 1
OnClick = BitBtn_qryClick
end
end
object ADOConnection1: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Mode=Share Deny N' +
'one;Extended Properties="";Persist Security Info=False;Jet OLEDB' +
':System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Databas' +
'e Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking' +
' Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bul' +
'k Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Cr' +
'eate System Database=False;Jet OLEDB:Encrypt Database=False;Jet ' +
'OLEDB:Don'#39't Copy Locale on Compact=False;Jet OLEDB:Compact Witho' +
'ut Replica Repair=False;Jet OLEDB:SFP=False'
LoginPrompt = False
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 128
Top = 184
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <
item
Name = 'Zuozhe'
Attributes = [paNullable]
DataType = ftWideString
NumericScale = 255
Precision = 255
Size = 510
Value = Null
end>
SQL.Strings = (
'select Zuozhe from '#38144#21806#20135#21697#28165#21333#34920)
Left = 160
Top = 184
end
object OpenPictureDialog1: TOpenPictureDialog
Filter =
'All (*.jpg;*.bmp)|*.jpg;*.bmp|JPEG Image File (*.jpg)|*.jpg|Bitm' +
'aps (*.bmp)|*.bmp'
Left = 503
Top = 293
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -