D7wmoukai/样品(YPGL.dll)/U_CPAdd.dfm
DESKTOP-E401PHE\Administrator 451d1bbba9 ~
2025-07-19 17:24:07 +08:00

473 lines
10 KiB
Plaintext

object frmCPAdd: TfrmCPAdd
Left = 621
Top = 251
Width = 1021
Height = 320
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 = 1005
Height = 30
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGL.ThreeImgList
EdgeInner = esNone
EdgeOuter = esNone
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
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 0
object CheckBox1: TCheckBox
Left = 10
Top = 7
Width = 97
Height = 17
Caption = #38376#24133#21333#20301#33521#23544
Checked = True
State = cbChecked
TabOrder = 0
OnClick = CheckBox1Click
end
end
end
object Panel2: TPanel
Left = 0
Top = 30
Width = 1005
Height = 251
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 = 70
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 = 114
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 = 158
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 = 41
Top = 202
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 Label10: TLabel
Left = 355
Top = 70
Width = 85
Height = 16
Caption = #20013#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 Label11: TLabel
Left = 355
Top = 114
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 Label12: TLabel
Left = 355
Top = 158
Width = 85
Height = 16
Caption = #20013#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 Label13: TLabel
Left = 355
Top = 202
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 = 670
Top = 70
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 Label19: TLabel
Left = 670
Top = 114
Width = 87
Height = 16
Caption = #20840' '#24133#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 = 158
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 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 = 66
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object CYKZ: TEdit
Left = 121
Top = 110
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnExit = CYKZExit
end
object CYHX: TEdit
Left = 121
Top = 154
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object KuWei: TEdit
Left = 121
Top = 198
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
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
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
end
object CYECF: TEdit
Left = 746
Top = 66
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
end
object CYMF: TEdit
Left = 435
Top = 110
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
OnExit = CYMFExit
end
object CYQF: TEdit
Left = 746
Top = 110
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
OnExit = CYMFExit
end
object CYColor: TEdit
Left = 435
Top = 154
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 10
end
object CYEColor: TEdit
Left = 746
Top = 154
Width = 200
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 11
end
object Note: TEdit
Left = 435
Top = 198
Width = 511
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 12
end
object CYCF: TBtnEditC
Left = 435
Top = 66
Width = 201
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 13
OnBtnUpClick = CYCFBtnUpClick
OnBtnDnClick = CYCFBtnDnClick
end
end
object ADOQueryMain: TADOQuery
Connection = DataLink_YPGL.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 517
Top = 9
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YPGL.ADOLink
Parameters = <>
Left = 565
Top = 9
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_YPGL.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 613
Top = 1
end
end