object frmZHDJInPut: TfrmZHDJInPut Left = 189 Top = 134 Width = 1344 Height = 697 Caption = #20135#21697#30331#35760 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 = 1328 Height = 30 ButtonHeight = 30 ButtonWidth = 123 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_MYSC.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 Panel4: TPanel Left = 36 Top = 0 Width = 331 Height = 30 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object Label1: TLabel Left = 2 Top = 4 Width = 44 Height = 21 Caption = #25195#25551 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object DYID: TEdit Left = 49 Top = 0 Width = 238 Height = 29 TabOrder = 0 OnKeyPress = DYIDKeyPress end object Button1: TButton Left = 287 Top = 1 Width = 41 Height = 28 Caption = '...' TabOrder = 1 OnClick = Button1Click end end object TBSave: TToolButton Left = 367 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 5 OnClick = TBSaveClick end object TBPrtInfo: TToolButton Left = 450 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 14 OnClick = TBPrtInfoClick end object TBPrtBJ: TToolButton Left = 533 Top = 0 Caption = #25171#21360#25253#20215 ImageIndex = 4 Visible = False OnClick = TBPrtBJClick end object TBClose: TToolButton Left = 656 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end object Edit2: TEdit Left = 739 Top = 0 Width = 30 Height = 30 TabOrder = 1 Visible = False end end object Panel3: TPanel Left = 0 Top = 30 Width = 1328 Height = 627 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object Panel5: TPanel Left = 2 Top = 2 Width = 1324 Height = 122 Align = alTop TabOrder = 0 object Label4: TLabel Left = 17 Top = 11 Width = 51 Height = 16 Caption = #23458#25143#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 298 Top = 11 Width = 103 Height = 16 Caption = #21306#22495'('#22269#23478')'#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 826 Top = 1 Width = 17 Height = 120 Align = alRight Caption = #13#10#22791#13#10#13#10#13#10#13#10#27880 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 327 Top = 48 Width = 68 Height = 16 Caption = #19994#21153#21592#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 327 Top = 93 Width = 68 Height = 16 Caption = #29702#21333#21592#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 567 Top = 1 Width = 17 Height = 120 Align = alRight Caption = #13#10#23458#13#10#25143#13#10#13#10#24037#13#10#33402 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Panel66: TPanel Left = 1032 Top = 1 Width = 202 Height = 120 Align = alRight BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object Image2: TImage Left = 299 Top = 154 Width = 85 Height = 65 Visible = False OnDblClick = Image2DblClick end end object Panel2: TPanel Left = 1234 Top = 1 Width = 89 Height = 120 Align = alRight BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object Image22: TImage Left = 16 Top = 192 Width = 60 Height = 51 Visible = False end object Button2: TButton Left = 5 Top = 28 Width = 79 Height = 64 Caption = #36873#25321#21517#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 KHName: TBtnEditA Tag = 2 Left = 67 Top = 7 Width = 206 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnBtnClick = KHNameBtnClick end object GuoJia: TBtnEditA Tag = 2 Left = 389 Top = 7 Width = 130 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 3 OnBtnClick = GuoJiaBtnClick end object Note: TMemo Tag = 2 Left = 843 Top = 1 Width = 189 Height = 120 Align = alRight Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 end object YWY: TBtnEditA Tag = 2 Left = 389 Top = 43 Width = 130 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 5 OnBtnClick = YWYBtnClick end object Panel9: TPanel Left = 18 Top = 54 Width = 255 Height = 65 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 6 Visible = False object LabBZ: TLabel Left = 11 Top = 27 Width = 51 Height = 16 Caption = #24065#31181#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object LabHuiLv: TLabel Left = 129 Top = 12 Width = 51 Height = 16 Caption = #27719#29575#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 129 Top = 40 Width = 51 Height = 16 Caption = #31995#25968#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object BZ: TComboBox Tag = 2 Left = 61 Top = 23 Width = 44 Height = 24 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 0 Text = '$' OnChange = BZChange Items.Strings = ( '$' #65509) end object HuiLv: TEdit Tag = 2 Left = 185 Top = 8 Width = 64 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnKeyPress = HuiLvKeyPress end object XS: TEdit Tag = 2 Left = 185 Top = 35 Width = 64 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnKeyPress = XSKeyPress end end object LiDan: TBtnEditA Tag = 2 Left = 389 Top = 88 Width = 130 Height = 25 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 7 OnBtnClick = LiDanBtnClick end object KHGY: TMemo Tag = 9 Left = 584 Top = 1 Width = 242 Height = 120 Align = alRight Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 8 OnChange = KHGYChange end end object cxGrid1: TcxGrid Left = 2 Top = 124 Width = 1324 Height = 501 Align = alClient PopupMenu = PopupMenu1 TabOrder = 1 object Tv1: TcxGridDBTableView OnDblClick = Tv1DblClick OnMouseDown = Tv1MouseDown NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter end item Kind = skSum end item Kind = skCount Position = spFooter Column = v1Column7 end item Kind = skCount Column = v1Column7 end> DataController.Summary.FooterSummaryItems = < item Kind = skCount Column = v1Column7 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsCustomize.DataRowSizing = True OptionsView.DataRowHeight = 80 OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Content = DataLink_MYSC.Default10 Styles.Footer = DataLink_MYSC.Default10 Styles.Header = DataLink_MYSC.Default10 object v1Column9: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Options.Sorting = False Width = 40 end object v1Column7: TcxGridDBColumn Tag = 2 Caption = #32534#21495 DataBinding.FieldName = 'ZIID' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 96 end object v1Column2: TcxGridDBColumn Tag = 2 Caption = #21697#21517 DataBinding.FieldName = 'ZIName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 137 end object v1Column8: TcxGridDBColumn Tag = 2 Caption = #22270#29255 DataBinding.FieldName = 'ImageFileTP' PropertiesClassName = 'TcxImageProperties' Properties.GraphicClassName = 'TJPEGImage' Properties.Stretch = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 141 end object v1Column4: TcxGridDBColumn Tag = 2 Caption = #38376#24133 DataBinding.FieldName = 'ZIMF' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 50 end object v1Column6: TcxGridDBColumn Tag = 2 Caption = #20811#37325 DataBinding.FieldName = 'ZIKZ' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 52 end object v1Column1: TcxGridDBColumn Tag = 2 Caption = #25104#20221 DataBinding.FieldName = 'ZICF' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Styles.Footer = DataLink_MYSC.Default10 Width = 77 end object v1Column11: TcxGridDBColumn Tag = 2 Caption = #21407#22987#24037#33402 DataBinding.FieldName = 'ZIGYYS' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 164 end object v1ZIGY: TcxGridDBColumn Tag = 2 Caption = #23458#25143#24037#33402 DataBinding.FieldName = 'ZIGY' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 140 end object v1Column13: TcxGridDBColumn Tag = 2 Caption = #24211#23384 DataBinding.FieldName = 'GS' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 49 end object v1Column3: TcxGridDBColumn Tag = 2 Caption = #31867#21035 DataBinding.FieldName = 'LeiBie' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #30331#35760#26679 #25343#36208#21514#21345) OnCustomDrawCell = v1Column3CustomDrawCell HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 85 end object v1ZICost: TcxGridDBColumn Tag = 2 Caption = #25104#26412 DataBinding.FieldName = 'ZICost' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1ZICostPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 49 end object v1XS: TcxGridDBColumn Tag = 2 Caption = #31995#25968 DataBinding.FieldName = 'XS' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1ZICostPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 47 end object v1BaoJia: TcxGridDBColumn Tag = 2 Caption = #21442#32771#25253#20215 DataBinding.FieldName = 'BaoJia' OnCustomDrawCell = v1BaoJiaCustomDrawCell HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 74 end object v1Column5: TcxGridDBColumn Tag = 2 Caption = #25253#20215 DataBinding.FieldName = 'BaoJiaYW' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1Column5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 60 end object v1Column12: TcxGridDBColumn DataBinding.FieldName = 'HeSuanStatus' Visible = False Hidden = True end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end end object Panel1: TPanel Left = 539 Top = 263 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 = 2 Visible = False end object ADOTemp: TADOQuery Connection = DataLink_MYSC.ADOLink LockType = ltReadOnly Parameters = <> Left = 1022 Top = 65533 end object ADOCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 864 Top = 65533 end object ADOQuery1: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 817 Top = 65533 end object CDS_PRT: TClientDataSet Aggregates = <> Params = <> Left = 843 Top = 65532 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 = 786 Top = 65534 ReportData = {} end object ODPat: TOpenDialog Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing] Left = 918 Top = 65533 end object IdFTP1: TIdFTP MaxLineAction = maException ReadTimeout = 0 ProxySettings.ProxyType = fpcmNone ProxySettings.Port = 0 Left = 949 Top = 65532 end object SaveDialog1: TSaveDialog Left = 969 Top = 65533 end object adoqueryPicture: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 1057 Top = 65535 end object RMDBMain: TRMDBDataSet Visible = True DataSet = CDS_PRT Left = 1088 end object ADOQueryCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 976 Top = 64 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 512 Top = 320 end object DataSource1: TDataSource DataSet = Order_Sub Left = 512 Top = 348 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 512 Top = 377 end object PopupMenu1: TPopupMenu Left = 511 Top = 407 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end object N3: TMenuItem Caption = #21024#38500 OnClick = N3Click end end object ADOQuery2: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 893 Top = 65534 end object ADOQuery3: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 991 Top = 65533 end object ADOQuery6: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 1127 Top = 65533 end end