D7wmleixiaofu/样品/U_CPAdd.dfm

478 lines
11 KiB
Plaintext
Raw Permalink Normal View History

2025-04-30 16:04:42 +08:00
object frmCPAdd: TfrmCPAdd
Left = 234
Top = 254
Width = 1015
Height = 345
Align = alCustom
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 999
Height = 33
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGL.ThreeImgList
Flat = True
Images = DataLink_YPGL.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
object Panel1: TPanel
Left = 126
Top = 0
Width = 131
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object CheckBox1: TCheckBox
Left = 10
Top = 7
Width = 97
Height = 17
Caption = #38376#24133#21333#20301#33521#23544
TabOrder = 0
end
end
end
object Panel2: TPanel
Left = 0
Top = 33
Width = 999
Height = 274
Align = alClient
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 1
object Label1: TLabel
Left = 41
Top = 26
Width = 85
Height = 16
Caption = #20135#21697#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 41
Top = 61
Width = 87
Height = 16
Caption = #35268' '#26684#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 41
Top = 98
Width = 87
Height = 16
Caption = #20811' '#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 41
Top = 135
Width = 87
Height = 16
Caption = #33457' '#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 669
Top = 98
Width = 87
Height = 16
Caption = #24211' '#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 355
Top = 26
Width = 85
Height = 16
Caption = #20013#25991#21697#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 355
Top = 98
Width = 85
Height = 16
Caption = #26377#25928#38376#24133#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 39
Top = 173
Width = 87
Height = 16
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 670
Top = 26
Width = 85
Height = 16
Caption = #33521#25991#21697#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 358
Top = 61
Width = 85
Height = 16
Caption = #33521#25991#25104#20998#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 670
Top = 61
Width = 85
Height = 16
Caption = #33521#25991#39068#33394#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 356
Top = 132
Width = 87
Height = 16
Caption = #23494' '#24230#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 670
Top = 131
Width = 85
Height = 16
Caption = #32463#32428#25467#24230#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 670
Top = 168
Width = 85
Height = 16
Caption = #26368#20302#25253#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CYNo: TEdit
Left = 121
Top = 22
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnKeyPress = CYNoKeyPress
end
object CYSpec: TEdit
Left = 121
Top = 57
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnKeyPress = CYSpecKeyPress
end
object CYKZ: TEdit
Left = 121
Top = 94
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnKeyPress = CYKZKeyPress
end
object CYHX: TEdit
Left = 121
Top = 131
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnKeyPress = CYHXKeyPress
end
object DefStr2: TEdit
Left = 746
Top = 94
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
OnKeyPress = DefStr2KeyPress
end
object CYName: TEdit
Left = 435
Top = 22
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
OnKeyPress = CYNameKeyPress
end
object CYEName: TEdit
Left = 746
Top = 22
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnKeyPress = CYENameKeyPress
end
object CYECF: TEdit
Left = 434
Top = 57
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
OnKeyPress = CYECFKeyPress
end
object CYMF: TEdit
Left = 435
Top = 94
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
OnKeyPress = CYMFKeyPress
end
object CYColorEng: TEdit
Left = 746
Top = 57
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
OnKeyPress = CYColorEngKeyPress
end
object CYNote: TEdit
Left = 120
Top = 169
Width = 513
Height = 64
AutoSize = False
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 10
end
object DefStr4: TEdit
Left = 746
Top = 127
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 11
OnKeyPress = defstr4KeyPress
end
object DefStr3: TEdit
Left = 436
Top = 128
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 12
OnKeyPress = CYColorKeyPress
end
object ZDBJ: TEdit
Left = 746
Top = 164
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 13
OnKeyPress = defstr4KeyPress
end
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_YPGL.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 461
Top = 105
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YPGL.ADOLink
Parameters = <>
Left = 413
Top = 113
end
object ADOQueryMain: TADOQuery
Connection = DataLink_YPGL.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 365
Top = 113
end
end