object frmCGPriceChk: TfrmCGPriceChk Left = 58 Top = 87 Width = 964 Height = 474 Caption = #37319#36141#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 = 948 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 = 948 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 = 34 Top = 13 Width = 61 Height = 15 Caption = #20379' '#24212' '#21830 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label4: TLabel Left = 206 Top = 41 Width = 30 Height = 15 Caption = #21697#21517 end object Label12: TLabel Left = 368 Top = 13 Width = 60 Height = 15 Caption = #21333#20215#23457#26680 end object Label5: TLabel Left = 34 Top = 41 Width = 60 Height = 15 Caption = #26159#21542#21547#31246 end object Label1: TLabel Left = 546 Top = 12 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 = 368 Top = 41 Width = 62 Height = 15 Caption = #39068' '#33394 end object GYSJCName: TEdit Tag = 2 Left = 98 Top = 10 Width = 170 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 OnChange = GYSJCNameChange OnKeyPress = GYSJCNameKeyPress end object begdate: TDateTimePicker Left = 612 Top = 9 Width = 106 Height = 23 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 1 Visible = False end object Enddate: TDateTimePicker Left = 612 Top = 36 Width = 106 Height = 23 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 2 Visible = False end object P_CodeName: TEdit Tag = 2 Left = 236 Top = 37 Width = 113 Height = 23 TabOrder = 3 OnChange = GYSJCNameChange end object CheckBox1: TCheckBox Left = 542 Top = 39 Width = 61 Height = 17 Caption = #25353#26085#26399 TabOrder = 4 OnClick = CheckBox1Click end object ChkStatusP: TComboBox Tag = 2 Left = 429 Top = 10 Width = 92 Height = 23 Style = csDropDownList ItemHeight = 15 TabOrder = 5 OnChange = GYSJCNameChange Items.Strings = ( #24050#23457#26680 #26410#23457#26680 '') end object HanShui: TComboBox Tag = 2 Left = 98 Top = 37 Width = 83 Height = 23 Style = csDropDownList ItemHeight = 15 TabOrder = 6 OnChange = GYSJCNameChange Items.Strings = ( #21547#31246 #19981#21547#31246 '') end object P_Color: TEdit Tag = 2 Left = 429 Top = 38 Width = 92 Height = 23 TabOrder = 7 OnChange = GYSJCNameChange end object FactoryNo: TEdit Tag = 2 Left = 269 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 = 8 OnChange = GYSJCNameChange OnKeyPress = FactoryNoKeyPress end object Panel3: TPanel Left = 785 Top = 2 Width = 161 Height = 66 Align = alRight BevelOuter = bvNone TabOrder = 9 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 = 86 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 = 86 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 = 948 Height = 335 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 item Kind = skSum Position = spFooter Column = cxGridDBColumn48 end item Kind = skSum Column = cxGridDBColumn48 end item Kind = skSum Position = spFooter Column = cxGridDBColumn41 end item Kind = skSum Position = spFooter Column = cxGridDBColumn40 end item Kind = skSum Column = cxGridDBColumn41 end item Kind = skSum Column = cxGridDBColumn40 end> DataController.Summary.FooterSummaryItems = < item Format = '#0' Kind = skSum Column = cxGridDBColumn39 end item Format = #37329#39069':##' Kind = skSum Column = cxGridDBColumn48 end item Kind = skSum Column = cxGridDBColumn41 end item Kind = skSum Column = cxGridDBColumn40 end item Format = #20010#25968':##' Kind = skCount Column = cxGridDBColumn29 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 cxGridDBColumn28: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 49 end object cxGridDBColumn29: TcxGridDBColumn Tag = 7 Caption = #26085#26399 DataBinding.FieldName = 'CRTime1' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 104 end object cxGridDBColumn30: 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 cxGridDBColumn31: TcxGridDBColumn Caption = #20379#24212#21830#32534#21495 DataBinding.FieldName = 'FactoryNo' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 91 end object cxGridDBColumn32: TcxGridDBColumn Tag = 7 Caption = #20379#24212#21830#31616#31216 DataBinding.FieldName = 'GYSJCName' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 168 end object cxGridDBColumn33: TcxGridDBColumn Tag = 7 Caption = #21697#21517 DataBinding.FieldName = 'P_CodeName' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 159 end object cxGridDBColumn34: TcxGridDBColumn Caption = #38376#24133'cm' DataBinding.FieldName = 'P_MF' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object cxGridDBColumn35: TcxGridDBColumn Caption = #20811#37325'g/'#13217 DataBinding.FieldName = 'P_KZ' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 87 end object cxGridDBColumn36: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'P_Color' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 81 end object cxGridDBColumn37: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'P_Spec' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 126 end object cxGridDBColumn38: 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 cxGridDBColumn39: TcxGridDBColumn Tag = 7 Caption = #21305#25968 DataBinding.FieldName = 'ps' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 65 end object cxGridDBColumn40: TcxGridDBColumn Caption = #20844#26020#25968 DataBinding.FieldName = 'KGQty' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 83 end object cxGridDBColumn41: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 88 end object cxGridDBColumn42: TcxGridDBColumn Caption = #25968#37327#23457#26680 DataBinding.FieldName = 'ChkStatusQ' Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Editing = False Width = 78 end object cxGridDBColumn43: TcxGridDBColumn Caption = #25968#37327#23457#26680#20154 DataBinding.FieldName = 'ChkerQ' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True Visible = False HeaderAlignmentHorz = taCenter Hidden = True Width = 100 end object cxGridDBColumn44: TcxGridDBColumn Caption = #25968#37327#23457#26680#26102#38388 DataBinding.FieldName = 'ChkTimeQ' Visible = False HeaderAlignmentHorz = taCenter Hidden = True Options.Editing = False Width = 109 end object cxGridDBColumn45: TcxGridDBColumn Tag = 7 Caption = #26680#31639#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 = 78 end object cxGridDBColumn46: 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 cxGridDBColumn47: TcxGridDBColumn Tag = 7 Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 72 end object cxGridDBColumn48: TcxGridDBColumn Tag = 7 Caption = #37329#39069 DataBinding.FieldName = 'Money' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn5PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object cxGridDBColumn49: 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 cxGridDBColumn50: 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 cxGridDBColumn51: TcxGridDBColumn Caption = #21333#20215#23457#26680 DataBinding.FieldName = 'ChkStatusP' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 82 end object cxGridDBColumn52: TcxGridDBColumn Caption = #21333#20215#23457#26680#20154 DataBinding.FieldName = 'ChkerP' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 91 end object cxGridDBColumn53: TcxGridDBColumn Caption = #21333#20215#23457#26680#26102#38388 DataBinding.FieldName = 'ChkTimeP' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 107 end object cxGridDBColumn54: 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 = 303 Top = 190 Width = 298 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 = 1253 end object ADOQueryMain: TADOQuery Connection = DataLink_Money.ADOLink LockType = ltReadOnly Parameters = <> Left = 1101 Top = 1 end object cxGridPopupMenu2: TcxGridPopupMenu PopupMenus = <> Left = 1220 Top = 1 end object DS_HZ: TDataSource DataSet = CDS_HZ Left = 1147 Top = 3 end object CDS_HZ: TClientDataSet Aggregates = <> Params = <> Left = 1185 Top = 2 end object PopupMenu1: TPopupMenu Left = 787 Top = 145 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 Visible = False OnClick = N3Click end end end