object frmCPAdd: TfrmCPAdd Left = 459 Top = 231 Anchors = [] Caption = #25104#21697#24405#20837 ClientHeight = 507 ClientWidth = 716 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 716 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 115 Caption = 'ToolBar1' Color = clWhite DisabledImages = DataLink_YPGL.ImageList_new32 Images = DataLink_YPGL.ImageList_new32 List = True ParentColor = False ShowCaptions = True TabOrder = 0 object ToolButton1: TToolButton Tag = 1 Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end object ToolButton2: TToolButton Left = 142 Top = 0 AutoSize = True Caption = #20999#25442#38376#24133#21333#20301 ImageIndex = 1 Visible = False OnClick = ToolButton2Click end end object ScrollBox1: TScrollBox Left = 0 Top = 38 Width = 716 Height = 196 Align = alClient BevelInner = bvNone BevelOuter = bvNone Color = clWhite Ctl3D = False ParentColor = False ParentCtl3D = False TabOrder = 1 object Label1: TLabel Left = 31 Top = 33 Width = 65 Height = 12 Caption = #20135#21697#32534#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 362 Top = 33 Width = 65 Height = 12 Caption = #20135#21697#21517#31216#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 31 Top = 107 Width = 67 Height = 12 Caption = #38376' '#24133#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label22: TLabel Left = 362 Top = 107 Width = 67 Height = 12 Caption = #20811' '#37325#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 73 Top = 440 Width = 51 Height = 16 Caption = #39068#33394#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label4: TLabel Left = 373 Top = 440 Width = 51 Height = 16 Caption = #33457#22411#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label3: TLabel Left = 33 Top = 486 Width = 51 Height = 16 Caption = #26465#30721#65306 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object lbl1: TLabel Left = 362 Top = 132 Width = 67 Height = 12 Caption = #21333' '#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 31 Top = 56 Width = 65 Height = 12 Caption = #38271#24230#31995#25968#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 31 Top = 132 Width = 67 Height = 12 Caption = #32553' '#29575#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 362 Top = 56 Width = 65 Height = 12 Caption = #20307#31215#31995#25968#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 31 Top = 157 Width = 67 Height = 12 Caption = #36135' '#25551#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 362 Top = 80 Width = 67 Height = 12 Caption = #25104' '#20998#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 31 Top = 80 Width = 65 Height = 12 Caption = #21152#24037#24037#33402#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 299 Top = 56 Width = 28 Height = 12 Caption = 'M/KG' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 362 Top = 157 Width = 67 Height = 12 Caption = #26469' '#28304#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object CYNo: TEdit Tag = 2 Left = 93 Top = 30 Width = 234 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyPress = CYColorKeyPress end object CYName: TEdit Tag = 2 Left = 426 Top = 30 Width = 234 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnKeyPress = CYColorKeyPress end object CYColor: TEdit Tag = 2 Left = 116 Top = 437 Width = 218 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 12 Visible = False end object CYHX: TEdit Tag = 2 Left = 416 Top = 437 Width = 218 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 13 Visible = False end object CYID: TEdit Left = 76 Top = 483 Width = 218 Height = 22 Enabled = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 11 Visible = False end object CYPUnit: TEdit Tag = 2 Left = 426 Top = 130 Width = 234 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 9 OnKeyPress = CYColorKeyPress end object PBLengthXS: TEdit Tag = 2 Left = 93 Top = 54 Width = 200 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnKeyPress = CYColorKeyPress end object SuoLv: TEdit Tag = 2 Left = 93 Top = 130 Width = 234 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 8 OnExit = CYMFExit OnKeyPress = CYColorKeyPress end object CYTiJi: TEdit Tag = 2 Left = 426 Top = 54 Width = 234 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnKeyPress = CYColorKeyPress end object HuoMiao: TEdit Tag = 2 Left = 93 Top = 154 Width = 234 Height = 18 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 10 OnExit = CYMFExit OnKeyPress = CYColorKeyPress end object CYJGGY: TBtnEditC Tag = 2 Left = 93 Top = 78 Width = 234 Height = 20 Hint = 'CYJGGY/'#21152#24037#24037#33402 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnKeyPress = CYColorKeyPress OnBtnUpClick = CYJGGYBtnUpClick OnBtnDnClick = CYJGGYBtnDnClick end object CYMF: TBtnEditC Tag = 2 Left = 93 Top = 106 Width = 234 Height = 20 Hint = 'CYMF/'#38376#24133 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnBtnUpClick = CYMFBtnUpClick OnBtnDnClick = CYMFBtnDnClick end object CYKZ: TBtnEditC Tag = 2 Left = 426 Top = 104 Width = 234 Height = 20 Hint = 'CYKZ/'#20811#37325 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 7 OnBtnUpClick = CYMFBtnUpClick OnBtnDnClick = CYMFBtnDnClick end object CYCF: TBtnEditC Tag = 2 Left = 426 Top = 78 Width = 234 Height = 20 Hint = 'CYCF/'#25104#20998 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 OnBtnUpClick = CYMFBtnUpClick OnBtnDnClick = CYMFBtnDnClick end object LaiYuan: TBtnEditC Tag = 2 Left = 426 Top = 154 Width = 234 Height = 20 Hint = 'LaiYuan/'#26469#28304 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 14 OnBtnUpClick = CYMFBtnUpClick OnBtnDnClick = CYMFBtnDnClick end end object ToolBar2: TToolBar Left = 0 Top = 234 Width = 716 Height = 38 Align = alBottom AutoSize = True ButtonHeight = 38 ButtonWidth = 75 Caption = 'ToolBar2' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_YPGL.ImageList_new32 List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 2 OnClick = ToolButton3Click end object ToolButton4: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 6 OnClick = ToolButton4Click end end object cxGrid1: TcxGrid Left = 0 Top = 272 Width = 716 Height = 235 Align = alBottom TabOrder = 3 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource2 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.GroupByBox = False Styles.IncSearch = DataLink_YPGL.SHuangSe Styles.Header = DataLink_YPGL.Default Styles.Inactive = DataLink_YPGL.SHuangSe Styles.Selection = DataLink_YPGL.SHuangSe object v1CYNo: TcxGridDBColumn Caption = #22383#24067#32534#21495 DataBinding.FieldName = 'CYNo' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_YPGL.Default Width = 92 end object v1Column9: TcxGridDBColumn Caption = #22383#24067#21517#31216 DataBinding.FieldName = 'CYName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 150 end object cv1Column10: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'CYMF' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 92 end object v1Column2: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'CYKZ' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_YPGL.Default Width = 119 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object CDS_Sub: TClientDataSet Aggregates = <> Params = <> Left = 736 Top = 296 end object ADOQueryMain: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 477 Top = 1 end object DataSource2: TDataSource DataSet = CDS_Sub Left = 731 Top = 235 end object ADOQueryCmd: TADOQuery Connection = DataLink_YPGL.ADOLink Parameters = <> Left = 353 Top = 1 end object ADOQueryTemp: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 581 Top = 1 end object DataSource1: TDataSource DataSet = ClientDataSet1 Left = 371 Top = 567 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 308 Top = 560 end end