object frmDJBDDRK_Edit: TfrmDJBDDRK_Edit Left = 26 Top = 48 Width = 1556 Height = 754 Align = alClient Caption = #20449#24687#24405#20837 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 ToolBar1: TToolBar Left = 0 Top = 0 Width = 1540 Height = 33 ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_PBMDDJ.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 TBPrint: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #25171#21360#26631#31614 ImageIndex = 4 Visible = False OnClick = TBPrintClick end object TBClose: TToolButton Left = 150 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 33 Width = 1540 Height = 145 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 75 Top = 15 Width = 24 Height = 12 Caption = #26085#26399 end object Label8: TLabel Left = 116 Top = 148 Width = 48 Height = 12 Caption = #20837#24211#21333#21495 end object Label2: TLabel Left = 243 Top = 15 Width = 24 Height = 12 Caption = #31867#22411 end object Label4: TLabel Left = 33 Top = 44 Width = 66 Height = 12 Caption = #20379#24212#21830'/'#23458#25143 end object Label5: TLabel Left = 75 Top = 73 Width = 24 Height = 12 Caption = #22791#27880 end object CRTime: TDateTimePicker Left = 115 Top = 11 Width = 100 Height = 20 Date = 41509.970132187500000000 Format = 'yyyy-MM-dd' Time = 41509.970132187500000000 TabOrder = 0 end object InoutNo: TEdit Left = 164 Top = 144 Width = 100 Height = 20 TabOrder = 1 end object CRType: TComboBox Left = 275 Top = 11 Width = 117 Height = 20 Style = csDropDownList ItemHeight = 12 ItemIndex = 0 TabOrder = 2 Text = #21152#24037#20986#24211 Items.Strings = ( #21152#24037#20986#24211 #38144#21806#20986#24211) end object FactoryName: TBtnEditA Left = 113 Top = 40 Width = 280 Height = 20 TabOrder = 3 OnBtnClick = FactoryNameBtnClick end object Panel3: TPanel Left = 666 Top = 2 Width = 872 Height = 141 Align = alRight BevelOuter = bvNone Color = clSkyBlue TabOrder = 4 object Label3: TLabel Left = 445 Top = 81 Width = 44 Height = 21 Caption = #31859#25968 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 445 Top = 112 Width = 44 Height = 21 Caption = #37325#37327 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 554 Top = 8 Width = 44 Height = 21 Caption = #31995#25968 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label6: TLabel Left = 554 Top = 39 Width = 44 Height = 21 Caption = #30382#37325 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object QtyMX: TEdit Left = 491 Top = 80 Width = 65 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyPress = QtyMXKeyPress end object edtMJXH: TEdit Left = 342 Top = 84 Width = 65 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnKeyPress = edtMJXHKeyPress end object chkMJJH: TCheckBox Left = 276 Top = 84 Width = 63 Height = 21 Caption = #21367#21495 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = chkMJJHClick end object KgQtyMX: TEdit Left = 491 Top = 111 Width = 65 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnKeyPress = QtyMXKeyPress end object HSXS: TEdit Left = 598 Top = 8 Width = 65 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 Visible = False end object edtMJQTY3: TEdit Left = 598 Top = 39 Width = 65 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 Visible = False OnKeyPress = QtyMXKeyPress end end object ZNote: TMemo Left = 113 Top = 70 Width = 527 Height = 60 TabOrder = 5 end end object Panel2: TPanel Left = 0 Top = 207 Width = 1540 Height = 508 Align = alClient Caption = 'Panel2' TabOrder = 2 object cxGrid2: TcxGrid Left = 1 Top = 1 Width = 920 Height = 506 Align = alClient TabOrder = 0 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellClick = Tv1CellClick DataController.DataSource = DataSource3 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skCount end item Kind = skSum end item Kind = skSum Column = v2Column6 end item Kind = skSum end item Kind = skSum Column = v1Column9 end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Inactive = DataLink_PBMDDJ.SHuangSe Styles.IncSearch = DataLink_PBMDDJ.SHuangSe Styles.Selection = DataLink_PBMDDJ.SHuangSe Styles.Header = DataLink_PBMDDJ.Default object v1Column6: TcxGridDBColumn Caption = #20986#24211#21333#21495 DataBinding.FieldName = 'SPID' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object v1Column16: TcxGridDBColumn Tag = 2 Caption = #35745#21010#21333#21495 DataBinding.FieldName = 'QCorderNo' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column16PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 74 end object v2Column1: TcxGridDBColumn Tag = 2 Caption = #21697#21517 DataBinding.FieldName = 'SPName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v2Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 95 end object v1Column15: TcxGridDBColumn Tag = 2 Caption = #39068#33394 DataBinding.FieldName = 'SPColor' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column15PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 57 end object v1Column20: TcxGridDBColumn Tag = 2 Caption = #33394#21495 DataBinding.FieldName = 'SPColorNo' HeaderAlignmentHorz = taCenter Width = 62 end object v1Column9: TcxGridDBColumn Tag = 2 Caption = #21305#25968 DataBinding.FieldName = 'PiQty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 67 end object v2Column6: TcxGridDBColumn Tag = 2 Caption = #24635#31859#25968 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column6PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 85 end object v1Column12: TcxGridDBColumn Tag = 2 Caption = #32568#21495 DataBinding.FieldName = 'Note' HeaderAlignmentHorz = taCenter Width = 79 end end object cxGrid2Level1: TcxGridLevel GridView = Tv1 end end object GroupBox1: TGroupBox Left = 921 Top = 1 Width = 618 Height = 506 Align = alRight Caption = #22238#20179#26126#32454#20449#24687'('#21452#20987#21024#38500#26126#32454#20449#24687')' TabOrder = 1 object cxGrid1: TcxGrid Left = 2 Top = 14 Width = 614 Height = 490 Align = alClient PopupMenu = PopupMenu1 TabOrder = 0 object Tv2: TcxGridDBTableView OnMouseDown = Tv2MouseDown Navigator.Buttons.CustomButtons = <> OnCellDblClick = Tv2CellDblClick DataController.DataSource = DSMX DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'C_Code' end> DataController.Summary.FooterSummaryItems = < item Format = #20849' 0 '#21367 Kind = skCount Column = v2Column3 end item Kind = skSum Column = VC_MJqty1 end item Kind = skSum Column = VC_MJMaoZ end item Kind = skSum Column = Tv2Column2 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = DataLink_PBMDDJ.Default object Tv2Column1: TcxGridDBColumn Tag = 9 Caption = #36873#25321 DataBinding.FieldName = 'SSel' HeaderAlignmentHorz = taCenter Width = 39 end object v2Column5: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'MJXH' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 43 end object v2Column3: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'MJID' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv2Column2: TcxGridDBColumn Caption = #20928#37325 DataBinding.FieldName = 'MJQty4' Visible = False HeaderAlignmentHorz = taCenter Width = 52 end object Tv2Column3: TcxGridDBColumn Caption = #30382#37325 DataBinding.FieldName = 'MJQty3' Visible = False HeaderAlignmentHorz = taCenter Width = 54 end object VC_MJMaoZ: TcxGridDBColumn Caption = #37325#37327 DataBinding.FieldName = 'MJMaoZ' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column4PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 60 end object VC_MJqty1: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'MJLen' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column4PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 67 end object v2Column2: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'MXNote' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 66 end object v2Column4: TcxGridDBColumn Caption = #20869#37096#22791#27880 DataBinding.FieldName = 'NBMXNote' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged Visible = False HeaderAlignmentHorz = taCenter Width = 77 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end end end object ToolBar2: TToolBar Left = 0 Top = 178 Width = 1540 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_PBMDDJ.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 3 object TBADD: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 12 OnClick = TBADDClick end object TBdel: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 13 OnClick = TBDelClick end end object DataSource3: TDataSource DataSet = CDS_Main Left = 480 Top = 200 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 448 Top = 200 end object ADOQueryCmd: TADOQuery Connection = DataLink_PBMDDJ.ADOLink Parameters = <> Left = 344 Top = 156 end object ADOQueryMain: TADOQuery Connection = DataLink_PBMDDJ.ADOLink LockType = ltReadOnly Parameters = <> Left = 376 Top = 156 end object ADOQueryTemp: TADOQuery Connection = DataLink_PBMDDJ.ADOLink LockType = ltReadOnly Parameters = <> Left = 408 Top = 156 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 440 Top = 156 end object ADOMX: TADOQuery Connection = DataLink_PBMDDJ.ADOLink Parameters = <> Left = 808 Top = 250 end object CDS_MX: TClientDataSet Aggregates = <> Params = <> Left = 852 Top = 246 end object DSMX: TDataSource DataSet = CDS_MX Left = 884 Top = 246 end object RM2: 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 CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 616 Top = 4 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 692 Top = 4 end object ADOQueryPrint: TADOQuery Connection = DataLink_PBMDDJ.ADOLink LockType = ltReadOnly Parameters = <> Left = 652 Top = 4 end object ThreeColorBase: TcxStyleRepository Left = 459 Top = 8 PixelsPerInch = 96 object SHuangSe: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = 4707838 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] TextColor = clBtnText end object SkyBlue: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] TextColor = clBlack end object Default: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] end object QHuangSe: TcxStyle AssignedValues = [svColor, svFont] Color = 8454143 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] end object Red: TcxStyle AssignedValues = [svColor, svFont] Color = clRed Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] end object FontBlue: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clBlue end object TextSHuangSe: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clOlive end object FonePurple: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindow Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clPurple end object FoneClMaroon: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clMaroon end object FoneRed: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clRed end object RowColor: TcxStyle AssignedValues = [svColor] Color = 16311512 end object handBlack: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxBlue: TcxStyle AssignedValues = [svColor, svFont] Color = 16711731 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] end object SHuangSeCu: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = 4707838 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clRed end end object PopupMenu1: TPopupMenu Left = 1336 Top = 308 object N1: TMenuItem Caption = #36716#21333 OnClick = N1Click end end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 1228 Top = 212 end end