object frmCPRk: TfrmCPRk Left = 294 Top = 142 Width = 1292 Height = 658 BorderIcons = [biSystemMenu] Caption = #20837#24211#26126#32454#20449#24687 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object Label6: TLabel Left = 756 Top = 332 Width = 36 Height = 12 Caption = 'Label6' end object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1276 Height = 29 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clSkyBlue EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_Repertory.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 15 OnClick = TBSaveClick end object TBClose: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 29 Width = 1276 Height = 92 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 73 Top = 20 Width = 48 Height = 12 Caption = #20837#24211#26085#26399 end object Label2: TLabel Left = 407 Top = 20 Width = 48 Height = 12 Caption = #20837#24211#31867#22411 end object Label8: TLabel Left = 249 Top = 20 Width = 48 Height = 12 Caption = #20837#24211#21333#21495 end object Label9: TLabel Left = 249 Top = 58 Width = 48 Height = 12 Caption = #23384#25918#24037#21378 end object Label3: TLabel Left = 14 Top = 57 Width = 108 Height = 12 Caption = #20379#24212#21830'/'#21152#24037#21378'/'#23458#25143 end object Label4: TLabel Left = 713 Top = 36 Width = 408 Height = 24 Caption = #27880#24847#65306#31995#25968#20026#21333#20301#38271#24230#25442#31639#25104#21333#20301#20844#26020 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -24 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object CRTime: TDateTimePicker Left = 125 Top = 16 Width = 100 Height = 20 Date = 41509.970132187500000000 Format = 'yyyy-MM-dd' Time = 41509.970132187500000000 TabOrder = 0 end object CRType: TComboBox Left = 459 Top = 17 Width = 100 Height = 20 Style = csDropDownList ItemHeight = 12 TabOrder = 2 Items.Strings = ( #37319#36141#20837#24211 #21152#24037#23436#25104 #23458#25143#36864#36135 #23436#24037#20837#24211 #22238#20462#23436#25104 #26399#21021#20837#24211 #36864#36135#22238#20462) end object InoutNo: TEdit Left = 297 Top = 16 Width = 100 Height = 20 TabOrder = 1 end object FactoryName: TBtnEditA Left = 297 Top = 54 Width = 100 Height = 20 ReadOnly = True TabOrder = 4 OnBtnClick = FactoryNameBtnClick end object fromFactoryName: TBtnEditA Left = 126 Top = 55 Width = 100 Height = 20 ReadOnly = True TabOrder = 3 OnBtnClick = fromFactoryNameBtnClick end end object cxGrid1: TcxGrid Left = 0 Top = 150 Width = 1276 Height = 469 Align = alClient TabOrder = 3 object Tv1: TcxGridDBTableView OnMouseDown = Tv1MouseDown Navigator.Buttons.CustomButtons = <> 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 end item Kind = skSum Column = v1Qty end item Kind = skSum Column = v1Money 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 = DataLink_Repertory.Default OnCustomDrawIndicatorCell = Tv1CustomDrawIndicatorCell object v1Column2: TcxGridDBColumn Caption = #35746#21333#21495 DataBinding.FieldName = 'OrderNo' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column2PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 87 end object v1P_Code: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'P_Code' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1P_CodePropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 93 end object v1P_CodeName: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'P_CodeName' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 90 end object v1PRTSpec: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'P_SPEC' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 89 end object v1P_Color: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'P_Color' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1P_ColorPropertiesButtonClick Properties.OnEditValueChanged = v1P_ColorPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 63 end object v1Column5: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'P_MF' HeaderAlignmentHorz = taCenter Width = 68 end object v1Column6: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'P_KZ' HeaderAlignmentHorz = taCenter Width = 63 end object v1Column4: TcxGridDBColumn Caption = #32568#21495 DataBinding.FieldName = 'ganghao' HeaderAlignmentHorz = taCenter Width = 67 end object v1MJId: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'Rollnum' HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Content = DataLink_Repertory.FontBlue Styles.Footer = DataLink_Repertory.FontBlue Styles.Header = DataLink_Repertory.FontBlue Width = 65 end object v1Qty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Content = DataLink_Repertory.FontBlue Styles.Footer = DataLink_Repertory.FontBlue Styles.Header = DataLink_Repertory.FontBlue Width = 91 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.Sorting = False Width = 86 end object v1Column3: TcxGridDBColumn Caption = #31995#25968 DataBinding.FieldName = 'xs' HeaderAlignmentHorz = taCenter Width = 55 end object v1Price: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 70 end object v1Money: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'Money' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 80 end object v1Column1: TcxGridDBColumn Caption = #24211#20301 DataBinding.FieldName = 'kuwei' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 86 end object v1Note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 179 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ToolBar2: TToolBar Left = 0 Top = 121 Width = 1276 Height = 29 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clSkyBlue EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_Repertory.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 57 OnClick = ToolButton1Click end object btn1: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #36873#21333 ImageIndex = 31 OnClick = btn1Click end object ToolButton2: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 113 OnClick = ToolButton2Click end end object ADOQueryCmd: TADOQuery Connection = DataLink_Repertory.ADOLink Parameters = <> Left = 292 end object ADOQueryTmp: TADOQuery Connection = DataLink_Repertory.ADOLink Parameters = <> Left = 344 Top = 4 end object DataSource1: TDataSource DataSet = CDS_Main Left = 400 Top = 1 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 464 Top = 1 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 556 Top = 9 end end