object frmCPAdd: TfrmCPAdd Left = 432 Top = 240 Width = 1021 Height = 498 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 = 83 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 ToolButton2: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #26631#31614#25171#21360 ImageIndex = 12 OnClick = ToolButton2Click end object ComboBox1: TComboBox Left = 213 Top = 3 Width = 166 Height = 24 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 1 Text = #26679#21697#26631#31614 Items.Strings = ( #26679#21697#26631#31614 #23567#26679#26631#31614 #25968#30721#31859#26679 #33337#26679#26631#31614 '') end object Panel1: TPanel Left = 379 Top = 0 Width = 304 Height = 30 BevelOuter = bvNone Color = clSkyBlue TabOrder = 0 object Label21: TLabel Left = 173 Top = 10 Width = 24 Height = 12 Caption = #20221#25968 end object CheckBox1: TCheckBox Left = 26 Top = 7 Width = 97 Height = 17 Caption = #38376#24133#21333#20301#33521#23544 TabOrder = 0 OnClick = CheckBox1Click end object Edit1: TEdit Left = 131 Top = 6 Width = 38 Height = 20 TabOrder = 1 end end end object Panel2: TPanel Left = 0 Top = 30 Width = 1005 Height = 429 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 = 687 Top = 26 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 = 39 Top = 68 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 = 371 Top = 237 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 = 687 Top = 68 Width = 87 Height = 16 Caption = #26550' '#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 = 41 Top = 237 Width = 85 Height = 16 Caption = #20013#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 Label10: TLabel Left = 41 Top = 195 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 = 373 Top = 68 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 = 689 Top = 153 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 = 371 Top = 280 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 Label18: TLabel Left = 373 Top = 26 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 = 373 Top = 151 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 = 423 Top = 195 Width = 35 Height = 16 Caption = 'PO'#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 = 356 Top = 110 Width = 102 Height = 16 Caption = #20379#24212#21830#32534#21495#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 = 688 Top = 110 Width = 86 Height = 16 Caption = #20379' '#24212' '#21830#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 689 Top = 193 Width = 85 Height = 16 Caption = #24037#21378#32593#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 39 Top = 153 Width = 87 Height = 16 Caption = #20215' '#26684#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 39 Top = 110 Width = 87 Height = 16 Caption = #25968' '#37327#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 = 16 Top = 318 Width = 137 Height = 16 Caption = #31859#25968'/'#24211#20301'/'#39068#33394#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 = 686 Top = 233 Width = 102 Height = 16 Caption = #23458#25143#35746#21333#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label22: TLabel Left = 41 Top = 276 Width = 68 Height = 16 Caption = #27611#38376#24133#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 = 769 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 = 2 OnKeyPress = CYECFKeyPress end object CYKZ: TEdit Left = 121 Top = 64 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 = CYECFKeyPress end object CYHX: TEdit Left = 453 Top = 233 Width = 200 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 16 OnKeyPress = CYECFKeyPress end object KuWei: TEdit Left = 769 Top = 64 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 = CYECFKeyPress end object CYName: TEdit Left = 121 Top = 233 Width = 200 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 15 OnKeyPress = CYECFKeyPress end object CYECF: TEdit Left = 453 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 = 1 OnKeyPress = CYECFKeyPress end object CYMF: TEdit Left = 453 Top = 64 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 = CYECFKeyPress end object CYColor: TEdit Left = 769 Top = 149 Width = 200 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 10 OnKeyPress = CYECFKeyPress end object CYEColor: TEdit Left = 453 Top = 147 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 = CYECFKeyPress end object Note: TEdit Left = 453 Top = 276 Width = 532 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 17 OnKeyPress = CYECFKeyPress end object CYCF: TBtnEditC Left = 121 Top = 190 Width = 201 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 12 OnKeyPress = CYECFKeyPress OnBtnUpClick = CYCFBtnUpClick OnBtnDnClick = CYCFBtnDnClick end object CYPO: TEdit Left = 453 Top = 191 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 = CYECFKeyPress end object CYFacNO: TEdit Left = 453 Top = 106 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 MGNO: TEdit Left = 769 Top = 189 Width = 200 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 14 OnExit = CYMFExit OnKeyPress = CYECFKeyPress end object CYPrice: TEdit Left = 121 Top = 149 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 = CYECFKeyPress end object Qty: TEdit Left = 121 Top = 106 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 = CYECFKeyPress end object CYFacName: TBtnEditC Left = 769 Top = 106 Width = 201 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 8 OnKeyPress = CYECFKeyPress OnBtnUpClick = CYFacNameBtnUpClick end object MSKWYS: TcxMemo Left = 144 Top = 305 TabOrder = 18 Height = 93 Width = 829 end object KHorderno: TEdit Left = 777 Top = 229 Width = 200 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 19 OnKeyPress = CYECFKeyPress end object MMF: TEdit Left = 121 Top = 272 Width = 200 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 20 OnKeyPress = CYECFKeyPress end end object ADOQueryMain: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 521 Top = 37 end object ADOQueryCmd: TADOQuery Connection = DataLink_YPGL.ADOLink Parameters = <> Left = 573 Top = 33 end object ADOQueryTemp: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 613 Top = 45 end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 964 Top = 180 end object ADOQueryPrint: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 325 Top = 117 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] DefaultCollate = False ShowPrintDialog = False SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' PreviewOptions.RulerUnit = rmutScreenPixels PreviewOptions.RulerVisible = False PreviewOptions.DrawBorder = False PreviewOptions.BorderPen.Color = clGray PreviewOptions.BorderPen.Style = psDash Dataset = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 964 Top = 140 ReportData = {} end end