object frmXSPriceChk: TfrmXSPriceChk Left = 19 Top = 25 Width = 1326 Height = 655 Caption = #38144#21806#21333#20215#23457#26680 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 15 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1310 Height = 31 ButtonHeight = 30 ButtonWidth = 65 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Images = DataLink_Money.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 0 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 9 OnClick = TBRafreshClick end object ToolButton2: TToolButton Left = 69 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 59 OnClick = ToolButton2Click end object ToolButton1: TToolButton Left = 138 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 53 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 207 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 31 Width = 1310 Height = 70 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 object Label3: TLabel Left = 201 Top = 14 Width = 30 Height = 15 Caption = #23458#25143 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label4: TLabel Left = 628 Top = 14 Width = 30 Height = 15 Caption = #21697#21517 end object Label12: TLabel Left = 472 Top = 43 Width = 60 Height = 15 Caption = #21333#20215#23457#26680 end object Label7: TLabel Left = 199 Top = 43 Width = 30 Height = 15 Caption = #24065#31181 end object Label5: TLabel Left = 317 Top = 43 Width = 60 Height = 15 Caption = #26159#21542#21547#31246 end object Label1: TLabel Left = 15 Top = 14 Width = 60 Height = 15 Caption = #26597#35810#26085#26399 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label2: TLabel Left = 628 Top = 43 Width = 30 Height = 15 Caption = #33457#22411 end object Label6: TLabel Left = 963 Top = 14 Width = 60 Height = 15 Caption = #25968#37327#23457#26680 end object Label8: TLabel Left = 472 Top = 14 Width = 60 Height = 15 Caption = #23458#25143#32534#21495 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label9: TLabel Left = 784 Top = 14 Width = 77 Height = 15 Caption = #21512' '#21516' '#21495 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label10: TLabel Left = 963 Top = 43 Width = 62 Height = 15 Caption = #39068' '#33394 end object Label11: TLabel Left = 784 Top = 43 Width = 75 Height = 15 Caption = #25968#37327#23457#26680#20154 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object FactoryName10: TEdit Tag = 2 Left = 233 Top = 10 Width = 224 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 OnChange = FactoryName10Change OnKeyPress = FactoryName10KeyPress end object begdate: TDateTimePicker Left = 81 Top = 10 Width = 106 Height = 23 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 1 end object Enddate: TDateTimePicker Left = 81 Top = 39 Width = 105 Height = 23 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 2 end object P_CodeName: TEdit Tag = 2 Left = 660 Top = 10 Width = 113 Height = 23 TabOrder = 3 OnChange = FactoryName10Change end object CheckBox1: TCheckBox Left = 15 Top = 42 Width = 67 Height = 17 Caption = #25353#26085#26399 Checked = True State = cbChecked TabOrder = 4 end object ChkStatusP: TComboBox Tag = 2 Left = 533 Top = 39 Width = 80 Height = 23 Style = csDropDownList ItemHeight = 15 TabOrder = 5 OnChange = FactoryName10Change Items.Strings = ( #24050#23457#26680 #26410#23457#26680 '') end object BZTYpe: TComboBox Tag = 2 Left = 232 Top = 39 Width = 72 Height = 23 Style = csDropDownList ItemHeight = 15 TabOrder = 6 OnChange = FactoryName10Change Items.Strings = ( #65509 '$' '') end object HanShui: TComboBox Tag = 2 Left = 378 Top = 39 Width = 80 Height = 23 Style = csDropDownList ItemHeight = 15 TabOrder = 7 OnChange = FactoryName10Change Items.Strings = ( #21547#31246 #19981#21547#31246 '') end object P_HX: TEdit Tag = 2 Left = 660 Top = 39 Width = 113 Height = 23 TabOrder = 8 OnChange = FactoryName10Change end object ChkStatusQ: TComboBox Tag = 2 Left = 1027 Top = 10 Width = 85 Height = 23 Style = csDropDownList ItemHeight = 15 TabOrder = 9 OnChange = FactoryName10Change Items.Strings = ( #24050#23457#26680 #26410#23457#26680 '') end object FactoryNo: TEdit Tag = 2 Left = 533 Top = 10 Width = 80 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 10 OnChange = FactoryName10Change OnKeyPress = FactoryNoKeyPress end object ConNo: TEdit Tag = 2 Left = 862 Top = 10 Width = 89 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 11 OnChange = FactoryName10Change OnKeyPress = ConNoKeyPress end object P_Color: TEdit Tag = 2 Left = 1027 Top = 39 Width = 85 Height = 23 TabOrder = 12 OnChange = FactoryName10Change end object ChkerQ: TEdit Tag = 2 Left = 862 Top = 39 Width = 89 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 13 OnChange = FactoryName10Change OnKeyPress = ChkerQKeyPress end object Panel3: TPanel Left = 1146 Top = 2 Width = 162 Height = 66 Align = alRight BevelOuter = bvNone TabOrder = 14 object Label13: TLabel Left = 13 Top = 4 Width = 72 Height = 27 AutoSize = False Caption = ' ' Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -27 Font.Name = #23435#20307 Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label14: TLabel Left = 85 Top = 10 Width = 64 Height = 15 Caption = #65306#26410#23457#26680 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 13 Top = 36 Width = 72 Height = 27 AutoSize = False Caption = ' ' Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -27 Font.Name = #23435#20307 Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label16: TLabel Left = 87 Top = 42 Width = 64 Height = 15 Caption = #65306#24050#23457#26680 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end end end object cxGrid2: TcxGrid Left = 0 Top = 101 Width = 1310 Height = 516 Align = alClient PopupMenu = PopupMenu1 TabOrder = 2 object Tv2: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False NavigatorButtons.Delete.Enabled = False NavigatorButtons.Delete.Visible = False DataController.DataSource = DS_HZ DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum end item Kind = skSum end> DataController.Summary.FooterSummaryItems = < item Format = '#0.0' Kind = skSum Column = v2Qty end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Format = '#0' Kind = skSum Column = v2ps end item Kind = skSum end item Kind = skSum end item Format = '#0' Kind = skSum Column = v2Column3 end item Format = '#0.00' Kind = skSum Column = v2Column17 end item Format = '#0.00' Kind = skSum Column = v2Column18 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.OnGetContentStyle = Tv2StylesGetContentStyle Styles.Header = DataLink_Money.Default object v2CRTime: TcxGridDBColumn Tag = 7 Caption = #26085#26399 DataBinding.FieldName = 'CRTime' PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False Properties.OnEditValueChanged = cxGridDBColumn1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 104 end object v2Column8: TcxGridDBColumn Tag = 7 Caption = #20844#21496#25260#22836 DataBinding.FieldName = 'ComTaiTou' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v2Column8PropertiesButtonClick Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Editing = False Width = 114 end object v2Column16: TcxGridDBColumn Caption = #21512#21516#21495 DataBinding.FieldName = 'ConNo' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 105 end object v2Column4: TcxGridDBColumn Caption = #23458#25143#32534#21495 DataBinding.FieldName = 'FactoryNo' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 83 end object v2Column6: TcxGridDBColumn Tag = 7 Caption = #23458#25143 DataBinding.FieldName = 'FactoryName' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 168 end object v2YunDanNo: TcxGridDBColumn Tag = 7 Caption = #20986#24211#21333#21495 DataBinding.FieldName = 'CKNO' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 126 end object v2P_CodeName: TcxGridDBColumn Tag = 7 Caption = #21697#21517 DataBinding.FieldName = 'P_CodeName' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 159 end object v2P_MF: TcxGridDBColumn Caption = #38376#24133'cm' DataBinding.FieldName = 'P_MF' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object v2P_KZ: TcxGridDBColumn Caption = #20811#37325'g/'#13217 DataBinding.FieldName = 'P_KZ' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 87 end object v2P_Color: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'P_Color' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 81 end object v2P_HX: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'P_HX' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 126 end object v2P_Spec: TcxGridDBColumn Tag = 7 Caption = #35268#26684 DataBinding.FieldName = 'P_Spec' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v2P_SpecPropertiesButtonClick Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Editing = False Options.Focusing = False Width = 69 end object v2ps: TcxGridDBColumn Tag = 7 Caption = #21305#25968 DataBinding.FieldName = 'ps' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 65 end object v2Qty: TcxGridDBColumn Tag = 7 Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 82 end object v2Column10: TcxGridDBColumn Caption = #25968#37327#23457#26680 DataBinding.FieldName = 'ChkStatusQ' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 78 end object v2Column12: TcxGridDBColumn Caption = #25968#37327#23457#26680#20154 DataBinding.FieldName = 'ChkerQ' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 100 end object v2Column11: TcxGridDBColumn Caption = #25968#37327#23457#26680#26102#38388 DataBinding.FieldName = 'ChkTimeQ' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 109 end object v2QtyUnit: TcxGridDBColumn Tag = 7 Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = cxGridDBColumn6PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 58 end object v2Column13: TcxGridDBColumn Tag = 7 Caption = #26159#21542#21547#31246 DataBinding.FieldName = 'HanShui' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #24320#31080 #19981#24320#31080) HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object v2Column2: TcxGridDBColumn Tag = 7 Caption = #24065#31181 DataBinding.FieldName = 'BZType' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #65509 '$') HeaderAlignmentHorz = taCenter Options.Editing = False Width = 65 end object v2Column9: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 49 end object v2Column1: TcxGridDBColumn Tag = 7 Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 72 end object v2Column3: TcxGridDBColumn Tag = 7 Caption = #38468#21152#36153 DataBinding.FieldName = 'HZFee' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 67 end object VYB: TcxGridDBColumn Tag = 7 Caption = #37329#39069 DataBinding.FieldName = 'Money' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v2Column7: TcxGridDBColumn Caption = #26159#21542#24320#31080 DataBinding.FieldName = 'KPFlag' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Properties.OnEditValueChanged = v2Column7PropertiesEditValueChanged Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Editing = False Width = 64 end object VOrderNo: TcxGridDBColumn Caption = #20973#35777#21495 DataBinding.FieldName = 'YFTypeID' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Editing = False Width = 99 end object v2Column17: TcxGridDBColumn Caption = #20154#27665#24065#37329#39069 DataBinding.FieldName = 'MoneyRMB' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 106 end object v2Column18: TcxGridDBColumn Caption = #32654#37329#37329#39069 DataBinding.FieldName = 'MoneyMJ' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 107 end object v2Column5: TcxGridDBColumn Caption = #21333#20215#23457#26680 DataBinding.FieldName = 'ChkStatusP' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 82 end object v2Column14: TcxGridDBColumn Caption = #21333#20215#23457#26680#20154 DataBinding.FieldName = 'ChkerP' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 91 end object v2Column15: TcxGridDBColumn Caption = #21333#20215#23457#26680#26102#38388 DataBinding.FieldName = 'ChkTimeP' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 107 end object v2Note: TcxGridDBColumn Tag = 7 Caption = #22791#27880 DataBinding.FieldName = 'Note' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2BatchNoPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 75 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object Panel2: TPanel Left = 536 Top = 272 Width = 297 Height = 41 BevelInner = bvRaised BevelOuter = bvLowered Caption = #27491#22312#25805#20316#25968#25454#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False end object ADOQueryTemp: TADOQuery Connection = DataLink_Money.ADOLink LockType = ltReadOnly Parameters = <> Left = 1061 Top = 1 end object ADOQueryCmd: TADOQuery Connection = DataLink_Money.ADOLink Parameters = <> Left = 1237 Top = 1 end object ADOQueryMain: TADOQuery Connection = DataLink_Money.ADOLink LockType = ltReadOnly Parameters = <> Left = 1101 Top = 1 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 1240 Top = 16 end object DS_HZ: TDataSource DataSet = CDS_HZ Left = 1147 Top = 3 end object CDS_HZ: TClientDataSet Aggregates = <> Params = <> Left = 1200 Top = 8 end object PopupMenu1: TPopupMenu Left = 608 Top = 176 object N6: TMenuItem Caption = #20840#36873 OnClick = N6Click end object N7: TMenuItem Caption = #20840#24323 OnClick = N7Click end object N4: TMenuItem Caption = #25209#37327#23457#26680 OnClick = N4Click end object N5: TMenuItem Caption = #25209#37327#25764#38144 OnClick = N5Click end object N1: TMenuItem Caption = #23457#26680 OnClick = N1Click end object N2: TMenuItem Caption = #25764#38144 OnClick = N2Click end object N3: TMenuItem Caption = #20462#25913 OnClick = N3Click end end end