object frmEquipmentRk: TfrmEquipmentRk Left = 294 Top = 142 Width = 921 Height = 658 BorderIcons = [biSystemMenu] Caption = #35774#22791#20837#24211 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose 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 = 905 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_Warehouse.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 ToolButton4: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 57 OnClick = ToolButton4Click end object ToolButton3: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 113 OnClick = ToolButton3Click end object TBClose: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object cxGrid1: TcxGrid Left = 0 Top = 29 Width = 905 Height = 591 Align = alClient TabOrder = 1 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 end item Kind = skSum Column = v1Qty end item Kind = skSum 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_Warehouse.Default OnCustomDrawIndicatorCell = Tv1CustomDrawIndicatorCell object v1P_CodeName: TcxGridDBColumn Tag = 7 Caption = #20837#24211#21333#21495 DataBinding.FieldName = 'InoutNo' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 90 end object v1P_Code: TcxGridDBColumn Caption = #20837#24211#26085#26399 DataBinding.FieldName = 'CRTime' PropertiesClassName = 'TcxDateEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 93 end object v1PRTSpec: TcxGridDBColumn Caption = #20837#24211#31867#22411 DataBinding.FieldName = 'CRType' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( #29983#20135#36864#22238 #26399#21021#20837#24211) HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 89 end object v1Column5: TcxGridDBColumn Caption = #26469#33258#24037#21378 DataBinding.FieldName = 'fromFactoryName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column5PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 72 end object v1Column1: TcxGridDBColumn Caption = #21517#31216 DataBinding.FieldName = 'P_CodeName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 97 end object v1Column6: TcxGridDBColumn Caption = #23384#25918#24037#21378 DataBinding.FieldName = 'FactoryName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column6PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 77 end object v1Qty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Rollnum' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1QtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Content = DataLink_Warehouse.FontBlue Styles.Footer = DataLink_Warehouse.FontBlue Styles.Header = DataLink_Warehouse.FontBlue Width = 91 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 ADOQueryCmd: TADOQuery Connection = DataLink_Warehouse.ADOLink Parameters = <> Left = 432 Top = 64 end object ADOQueryTmp: TADOQuery Connection = DataLink_Warehouse.ADOLink Parameters = <> Left = 472 Top = 64 end object DataSource1: TDataSource DataSet = CDS_Main Left = 508 Top = 65 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 540 Top = 65 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 596 Top = 65 end end