object frmZHCPInPut: TfrmZHCPInPut Left = 193 Top = 117 Width = 993 Height = 723 Caption = #20844#21496#20135#21697#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 107 TextHeight = 17 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 977 Height = 30 ButtonHeight = 30 ButtonWidth = 79 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] Images = DataLink_YPGLBOM.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object Label26: TLabel Left = 0 Top = 0 Width = 36 Height = 30 Caption = ' ' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ToolButton1: TToolButton Left = 36 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 12 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 119 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel3: TPanel Left = 0 Top = 30 Width = 977 Height = 653 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object Image11: TImage Left = 416 Top = 100 Width = 65 Height = 55 Visible = False end object Image22: TImage Left = 400 Top = 295 Width = 85 Height = 64 Visible = False end object Label5: TLabel Left = 654 Top = 381 Width = 68 Height = 16 Caption = #21407#22270#35828#26126 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 150 Top = 381 Width = 68 Height = 16 Caption = #21407#22270#35828#26126 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 656 Top = 435 Width = 61 Height = 16 Caption = #24037' '#33402 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 141 Top = 435 Width = 61 Height = 16 Caption = #21697' '#21517 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 141 Top = 499 Width = 61 Height = 16 Caption = #22791' '#27880 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Panel6: TPanel Left = 589 Top = 54 Width = 334 Height = 311 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object Image1: TImage Left = 227 Top = 236 Width = 85 Height = 64 Visible = False OnDblClick = Image1DblClick end end object Panel5: TPanel Left = 2 Top = 2 Width = 973 Height = 44 Align = alTop TabOrder = 1 object Label12: TLabel Left = 236 Top = 14 Width = 69 Height = 16 Caption = #20811' '#37325#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 32 Top = 14 Width = 69 Height = 16 Caption = #38376' '#24133#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 182 Top = 12 Width = 23 Height = 19 Caption = 'CM' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Cambria' Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 383 Top = 12 Width = 33 Height = 19 Caption = 'g/'#13217 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Cambria' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 440 Top = 14 Width = 51 Height = 16 Caption = #25104#20221#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 742 Top = 14 Width = 51 Height = 16 Caption = #32534#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ZIKZ: TEdit Tag = 2 Left = 314 Top = 10 Width = 68 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object ZIMF: TEdit Tag = 2 Left = 113 Top = 10 Width = 68 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 Text = '150' end object ZICF: TEdit Tag = 2 Left = 493 Top = 9 Width = 235 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 Text = '100%P' end object ZIID: TEdit Tag = 9 Left = 796 Top = 9 Width = 125 Height = 23 Color = clMenu Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 3 end end object Panel8: TPanel Left = 495 Top = 54 Width = 98 Height = 311 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object Label1: TLabel Left = 11 Top = 54 Width = 76 Height = 18 Caption = #26631#31614#22270#29255 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Button1: TButton Left = 6 Top = 114 Width = 85 Height = 64 Caption = #36873#25321#22270#29255 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = Button1Click end end object Panel66: TPanel Left = 14 Top = 54 Width = 280 Height = 311 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 3 object Image2: TImage Left = 181 Top = 236 Width = 85 Height = 64 Visible = False OnDblClick = Image2DblClick end end object Panel2: TPanel Left = 292 Top = 54 Width = 98 Height = 311 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 4 object Label3: TLabel Left = 11 Top = 54 Width = 76 Height = 18 Caption = #23454#29289#22270#29255 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Button2: TButton Left = 6 Top = 114 Width = 85 Height = 64 Caption = #36873#25321#22270#29255 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = Button2Click end end object Panel1: TPanel Left = 407 Top = 199 Width = 282 Height = 47 BevelOuter = bvNone Caption = #27491#22312#22788#29702#25968#25454#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 Visible = False end object Edit1: TEdit Tag = 99 Left = 495 Top = 403 Width = 428 Height = 23 Color = clMenu Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 6 end object Edit2: TEdit Tag = 99 Left = 16 Top = 403 Width = 366 Height = 23 Color = clMenu Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 7 end object ZIGY: TMemo Tag = 9 Left = 495 Top = 461 Width = 428 Height = 154 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 8 end object ZIName: TEdit Tag = 9 Left = 16 Top = 461 Width = 366 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 9 end object Note: TMemo Tag = 9 Left = 16 Top = 517 Width = 366 Height = 100 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 10 end end object ADOTemp: TADOQuery Connection = DataLink_YPGLBOM.ADOLink LockType = ltReadOnly Parameters = <> Left = 584 Top = 5 end object ADOCmd: TADOQuery Connection = DataLink_YPGLBOM.ADOLink Parameters = <> Left = 552 Top = 5 end object ADOQuery1: TADOQuery Connection = DataLink_YPGLBOM.ADOLink Parameters = <> Left = 728 Top = 5 end object CDS_PRT: TClientDataSet Aggregates = <> Params = <> Left = 700 Top = 6 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 = RMDBMain CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 757 Top = 5 ReportData = {} end object ODPat: TOpenDialog Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing] Left = 484 Top = 5 end object IdFTP1: TIdFTP MaxLineAction = maException ReadTimeout = 0 ProxySettings.ProxyType = fpcmNone ProxySettings.Port = 0 Left = 517 Top = 4 end object SaveDialog1: TSaveDialog Left = 457 Top = 5 end object adoqueryPicture: TADOQuery Connection = DataLink_YPGLBOM.ADOLink Parameters = <> Left = 615 Top = 5 end object RMDBMain: TRMDBDataSet Visible = True DataSet = CDS_PRT Left = 657 Top = 5 end object ADOQueryCmd: TADOQuery Connection = DataLink_YPGLBOM.ADOLink Parameters = <> Left = 215 Top = 208 end end