object frmKHTop: TfrmKHTop Left = 317 Top = 198 Width = 1482 Height = 769 Caption = #23458#25143#38144#37327#25490#34892#27036 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1466 Height = 31 ButtonHeight = 30 ButtonWidth = 89 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_BIView.ThreeImgList Flat = True Images = DataLink_BIView.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 0 object Panel1: TPanel Left = 0 Top = 0 Width = 284 Height = 30 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 0 object Label1: TLabel Left = 307 Top = 9 Width = 24 Height = 12 Caption = #21697#21517 Visible = False end object Label5: TLabel Left = 8 Top = 9 Width = 48 Height = 12 Caption = #26597#35810#26085#26399 end object Label6: TLabel Left = 164 Top = 9 Width = 12 Height = 12 Caption = #33267 end object C_Code: TEdit Tag = 2 Left = 331 Top = 5 Width = 89 Height = 23 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 0 Visible = False OnChange = C_CodeNameChange end object BegDate: TDateTimePicker Left = 58 Top = 5 Width = 102 Height = 20 Date = 40675.000000000000000000 Time = 40675.000000000000000000 TabOrder = 1 end object EndDate: TDateTimePicker Left = 178 Top = 5 Width = 102 Height = 20 Date = 40675.000000000000000000 Time = 40675.000000000000000000 TabOrder = 2 end end object TBRafresh: TToolButton Left = 284 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 0 OnClick = TBRafreshClick end object ToolButton2: TToolButton Left = 347 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 20 Visible = False OnClick = ToolButton2Click end object ToolButton1: TToolButton Left = 410 Top = 0 Caption = #23548#20986'Excel' ImageIndex = 72 Visible = False OnClick = ToolButton1Click end object ComboBox1: TComboBox Left = 499 Top = 5 Width = 198 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 1 Visible = False Items.Strings = ( #20572#26426#22825#25968'Top60' #24320#26426#22825#25968'Top30' '') end object TBClose: TToolButton Left = 697 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel2: TPanel Left = 0 Top = 31 Width = 1466 Height = 699 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Panel3: TPanel Left = 2 Top = 2 Width = 588 Height = 695 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 0 object cxGrid1: TcxGrid Left = 2 Top = 20 Width = 584 Height = 673 Align = alClient TabOrder = 0 object Tv1: TcxGridDBTableView OnDblClick = Tv1DblClick Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v2Column7 end item Kind = skSum Column = v1Column4 end item Kind = skSum Column = v1Column5 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Inactive = DataLink_BIView.SHuangSe Styles.IncSearch = DataLink_BIView.SHuangSe Styles.Selection = DataLink_BIView.SHuangSe Styles.Footer = DataLink_BIView.FontBlue Styles.Header = DataLink_BIView.handBlack object v1Column1: TcxGridDBColumn Caption = #24207 DataBinding.FieldName = 'XH' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 43 end object v2Column12: TcxGridDBColumn Caption = #23458#25143 DataBinding.FieldName = 'KHName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 159 end object v2Column7: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 81 end object v1Column4: TcxGridDBColumn Caption = #20844#26020#25968 DataBinding.FieldName = 'KgQty' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 92 end object v1Column5: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'MQty' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 99 end object v1Column2: TcxGridDBColumn Caption = #21344#27604'%' DataBinding.FieldName = 'BL' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 67 end end object cxGridLevel1: TcxGridLevel GridView = Tv1 end end object SH1: TPanel Left = 2 Top = 2 Width = 584 Height = 18 Align = alTop BevelOuter = bvNone Caption = #23458#25143#38144#37327#25490#34892#27036 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object MovePanel3: TMovePanel Left = 187 Top = 184 Width = 321 Height = 177 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 2 Visible = False object Label13: TLabel Left = 88 Top = 16 Width = 132 Height = 33 Caption = #36755#20837#23494#30721 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #26999#20307'_GB2312' Font.Style = [fsBold] ParentFont = False end object Button9: TButton Left = 32 Top = 112 Width = 75 Height = 49 Caption = #30830#23450 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = Button9Click end object Button10: TButton Left = 200 Top = 112 Width = 75 Height = 49 Caption = #21462#28040 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Button10Click end object Password: TEdit Tag = 99999 Left = 32 Top = 56 Width = 241 Height = 43 CharCase = ecUpperCase Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -28 Font.Name = #26999#20307'_GB2312' Font.Style = [fsBold] ParentFont = False PasswordChar = '*' TabOrder = 2 end end end object Panel4: TPanel Left = 590 Top = 2 Width = 588 Height = 695 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 1 object cxGrid2: TcxGrid Left = 2 Top = 20 Width = 584 Height = 673 Align = alClient TabOrder = 0 object Tv2: TcxGridDBTableView OnDblClick = Tv2DblClick Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource3 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = cxGridDBColumn3 end item Kind = skSum Column = cxGridDBColumn4 end item Kind = skSum Column = cxGridDBColumn5 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Inactive = DataLink_BIView.SHuangSe Styles.IncSearch = DataLink_BIView.SHuangSe Styles.Selection = DataLink_BIView.SHuangSe Styles.Footer = DataLink_BIView.FontBlue Styles.Header = DataLink_BIView.handBlack object cxGridDBColumn1: TcxGridDBColumn Caption = #24207 DataBinding.FieldName = 'XH' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 43 end object cxGridDBColumn2: TcxGridDBColumn Caption = #19994#21153#21592 DataBinding.FieldName = 'KHName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 159 end object cxGridDBColumn3: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 81 end object cxGridDBColumn4: TcxGridDBColumn Caption = #20844#26020#25968 DataBinding.FieldName = 'KgQty' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 92 end object cxGridDBColumn5: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'MQty' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 99 end object cxGridDBColumn6: TcxGridDBColumn Caption = #21344#27604'%' DataBinding.FieldName = 'BL' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 67 end end object cxGridLevel2: TcxGridLevel GridView = Tv2 end end object Panel5: TPanel Left = 2 Top = 2 Width = 584 Height = 18 Align = alTop BevelOuter = bvNone Caption = #19994#21153#21592#38144#37327#25490#34892#27036 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end end end object Panel10: TPanel Left = 520 Top = 216 Width = 249 Height = 41 BevelInner = bvRaised BevelOuter = bvLowered Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 Visible = False end object ADOQueryTemp: TADOQuery Connection = DataLink_BIView.ADOLink LockType = ltReadOnly Parameters = <> Left = 893 Top = 1 end object ADOQueryCmd: TADOQuery Connection = DataLink_BIView.ADOLink Parameters = <> Left = 829 Top = 1 end object ADOQueryMain: TADOQuery Connection = DataLink_BIView.ADOLink LockType = ltReadOnly Parameters = <> Left = 861 Top = 65533 end object cxGridPopupMenu2: TcxGridPopupMenu PopupMenus = <> Left = 100 Top = 184 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 92 Top = 264 end object DataSource1: TDataSource DataSet = ClientDataSet1 Left = 91 Top = 227 end object DataSource3: TDataSource DataSet = ClientDataSet3 Left = 787 Top = 179 end object ClientDataSet3: TClientDataSet Aggregates = <> Params = <> Left = 788 Top = 216 end object Timer1: TTimer Enabled = False Interval = 120000 OnTimer = Timer1Timer Left = 458 Top = 169 end end