object frmBpkclist: TfrmBpkclist Left = 90 Top = 168 Width = 1196 Height = 557 Caption = #26679#21697#24211#23384#20449#24687#34920 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False WindowState = wsMaximized OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1180 AutoSize = True ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = YPCK_DataLink.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #26597#35810 ImageIndex = 2 OnClick = TBRafreshClick end object TOk: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #30830#23450 ImageIndex = 41 Visible = False OnClick = TOkClick end object TBExport: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 75 OnClick = TBExportClick end object TBPrint: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 12 Visible = False OnClick = TBPrintClick end object TBClose: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 32 Width = 1180 Height = 65 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 23 Top = 15 Width = 52 Height = 12 Caption = #20837#24211#26085#26399 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 64 Top = 40 Width = 13 Height = 12 Caption = #33267 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 248 Top = 40 Width = 52 Height = 12 Caption = #26679#21697#32534#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 448 Top = 40 Width = 52 Height = 12 Caption = #35268#26684#22411#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 248 Top = 16 Width = 52 Height = 12 Caption = #20837#24211#31867#22411 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 288 Top = 72 Width = 24 Height = 12 Caption = #20179#24211 end object Label7: TLabel Left = 448 Top = 16 Width = 52 Height = 12 Caption = #20135#21697#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 672 Top = 16 Width = 26 Height = 12 Caption = #24211#20301 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 672 Top = 40 Width = 26 Height = 12 Caption = #39068#33394 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object BegDate: TDateTimePicker Left = 76 Top = 11 Width = 100 Height = 20 Date = 40675.464742650460000000 Format = 'yyyy-MM-dd' Time = 40675.464742650460000000 ShowCheckbox = True TabOrder = 0 end object EndDate: TDateTimePicker Left = 76 Top = 35 Width = 100 Height = 20 Date = 40675.464761099540000000 Format = 'yyyy-MM-dd' Time = 40675.464761099540000000 ShowCheckbox = True TabOrder = 1 end object P_Code: TEdit Tag = 2 Left = 304 Top = 36 Width = 100 Height = 20 TabOrder = 2 OnChange = P_CodeChange end object P_spec: TEdit Tag = 2 Left = 504 Top = 36 Width = 100 Height = 20 TabOrder = 3 OnChange = P_CodeChange end object CRType: TComboBox Tag = 2 Left = 304 Top = 12 Width = 100 Height = 20 Style = csDropDownList ItemHeight = 12 ItemIndex = 0 TabOrder = 4 OnChange = P_CodeChange Items.Strings = ( '' #29983#20135#20837#24211) end object CheckBox1: TCheckBox Left = 872 Top = 12 Width = 97 Height = 17 Caption = #21547#24211#23384#20026#38646 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 end object ckName: TComboBox Left = 320 Top = 68 Width = 100 Height = 20 Style = csDropDownList ItemHeight = 12 ItemIndex = 0 TabOrder = 6 Text = #26679#21697#20179#24211 Items.Strings = ( #26679#21697#20179#24211) end object P_CodeName: TEdit Tag = 2 Left = 504 Top = 12 Width = 100 Height = 20 TabOrder = 7 OnChange = P_CodeChange end object kuwei: TEdit Tag = 2 Left = 700 Top = 12 Width = 100 Height = 20 TabOrder = 8 OnChange = P_CodeChange end object P_Color: TEdit Tag = 2 Left = 700 Top = 36 Width = 100 Height = 20 TabOrder = 9 OnChange = P_CodeChange end end object cxGrid1: TcxGrid Left = 0 Top = 97 Width = 1180 Height = 316 Align = alTop TabOrder = 2 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'C_Code' Column = v1P_CodeName end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1RollNum end item Kind = skSum Column = v1Qty end item Kind = skSum Column = v1Column5 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = YPCK_DataLink.Default object v1Ssel: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'Ssel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Visible = False HeaderAlignmentHorz = taCenter end object v1CRTime: TcxGridDBColumn Caption = #20837#24211#26085#26399 DataBinding.FieldName = 'CRTime' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object v1Column2: TcxGridDBColumn Caption = #24211#20301 DataBinding.FieldName = 'kuwei' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object v1CRType: TcxGridDBColumn Caption = #20837#24211#31867#22411 DataBinding.FieldName = 'CRType' HeaderAlignmentHorz = taCenter Options.Editing = False end object v1P_Code: TcxGridDBColumn Caption = #26679#21697#32534#21495 DataBinding.FieldName = 'P_Code' HeaderAlignmentHorz = taCenter Width = 70 end object v1P_CodeName: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'P_CodeName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object v1P_SPEC: TcxGridDBColumn Caption = #35268#26684#22411#21495 DataBinding.FieldName = 'P_SPEC' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 90 end object v1Column1: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'P_Color' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 60 end object v1P_MF: TcxGridDBColumn Caption = #38376#24133'(cm)' DataBinding.FieldName = 'P_MF' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object v1P_KZ: TcxGridDBColumn Caption = #20811#37325'(g/'#13217')' DataBinding.FieldName = 'P_KZ' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object v1CPType: TcxGridDBColumn Caption = #31561#32423 DataBinding.FieldName = 'CPType' Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Editing = False Width = 60 end object v1RollNum: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'RollNum' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = YPCK_DataLink.FontBlue Styles.Footer = YPCK_DataLink.FontBlue Styles.Header = YPCK_DataLink.FontBlue Width = 59 end object v1Qty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = YPCK_DataLink.FontBlue Styles.Footer = YPCK_DataLink.FontBlue Styles.Header = YPCK_DataLink.FontBlue Width = 59 end object v1QtyUnit: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'M' 'Kg') HeaderAlignmentHorz = taCenter Options.Editing = False Width = 62 end object v1Column4: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'price' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 60 end object v1Column5: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'money' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = YPCK_DataLink.cxStyle_fontclFuchsia Styles.Footer = YPCK_DataLink.cxStyle_fontclFuchsia Styles.Header = YPCK_DataLink.cxStyle_fontclFuchsia Width = 60 end object v1Note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object v1Column3: TcxGridDBColumn Caption = #36135#29289#26469#28304 DataBinding.FieldName = 'defstr1' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 100 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOQueryCmd: TADOQuery Connection = YPCK_DataLink.ADOLink Parameters = <> Left = 680 Top = 8 end object ADOQueryTmp: TADOQuery Connection = YPCK_DataLink.ADOLink Parameters = <> Left = 536 Top = 4 end object DataSource1: TDataSource DataSet = CDS_Main Left = 576 Top = 1 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 612 Top = 5 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 504 Top = 12 end end