object frmKuWeiInPutCeng: TfrmKuWeiInPutCeng Left = 388 Top = 97 Width = 929 Height = 571 Caption = #24211#20301#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 15 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 913 Height = 30 ButtonHeight = 30 ButtonWidth = 79 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] Images = DataLink_MYSC.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object Label26: TLabel Left = 0 Top = 0 Width = 36 Height = 30 Caption = ' ' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Panel4: TPanel Left = 36 Top = 0 Width = 231 Height = 30 BevelOuter = bvNone TabOrder = 0 end object ToolButton1: TToolButton Left = 267 Top = 0 Caption = #25171#21360 ImageIndex = 4 OnClick = ToolButton1Click end object Label10: TLabel Left = 346 Top = 0 Width = 45 Height = 30 Caption = ' ' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object TBClose: TToolButton Left = 391 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel5: TPanel Left = 0 Top = 30 Width = 313 Height = 503 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object Label9: TLabel Left = 129 Top = 352 Width = 88 Height = 21 Caption = #26159#21542#25171#21360 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 44 Top = 181 Width = 22 Height = 21 Caption = #31532 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 41 Top = 279 Width = 44 Height = 21 Caption = #23618#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 88 Top = 397 Width = 44 Height = 21 Caption = #26041#21521 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Panel1: TPanel Left = 2 Top = 2 Width = 309 Height = 255 Align = alTop TabOrder = 0 object Label14: TLabel Left = 39 Top = 25 Width = 44 Height = 21 Caption = #21306#22495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 39 Top = 85 Width = 44 Height = 21 Caption = #20998#21306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object QuYu: TBtnEditA Tag = 2 Left = 86 Top = 20 Width = 121 Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 OnDblClick = QuYuDblClick OnBtnClick = QuYuBtnClick end object FenQu: TBtnEditA Tag = 2 Left = 86 Top = 80 Width = 121 Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 1 OnDblClick = FenQuDblClick OnBtnClick = FenQuBtnClick end object cxPageControl1: TcxPageControl Left = 1 Top = 136 Width = 307 Height = 118 ActivePage = cxTabSheet1 Align = alBottom Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Style = 8 TabOrder = 2 ClientRectBottom = 118 ClientRectRight = 307 ClientRectTop = 26 object cxTabSheet1: TcxTabSheet Caption = #21333#25490#22686#21152 ImageIndex = 0 object Label1: TLabel Left = 81 Top = 63 Width = 88 Height = 21 Caption = #22686#21152#23618#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 54 Top = 23 Width = 22 Height = 21 Caption = #31532 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 176 Top = 23 Width = 22 Height = 21 Caption = #25490 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Pai: TEdit Tag = 2 Left = 85 Top = 15 Width = 84 Height = 37 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 end end object cxTabSheet2: TcxTabSheet Caption = #22810#25490#25209#37327#22686#21152 ImageIndex = 1 object Label5: TLabel Left = 88 Top = 63 Width = 88 Height = 21 Caption = #27599#25490#23618#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 38 Top = 23 Width = 44 Height = 21 Caption = #22686#21152 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 181 Top = 23 Width = 22 Height = 21 Caption = #25490 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object PaiQty: TEdit Tag = 2 Left = 85 Top = 15 Width = 94 Height = 37 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 end end end end object Button1: TButton Left = 199 Top = 273 Width = 75 Height = 34 Caption = #30830#23450 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Button1Click end object PrtFlag: TEdit Tag = 2 Left = 88 Top = 344 Width = 40 Height = 37 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 2 Text = #8730 OnClick = PrtFlagClick end object CengQty: TComboBox Tag = 2 Left = 88 Top = 272 Width = 105 Height = 37 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = #23435#20307 Font.Style = [] ItemHeight = 29 ParentFont = False TabOrder = 3 OnChange = CengChange Items.Strings = ( '1' '2' '3' '4' '5' '6' '7' '8' '9' '10' '') end object ComboBox1: TComboBox Left = 137 Top = 391 Width = 80 Height = 32 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ItemHeight = 24 ParentFont = False TabOrder = 4 Items.Strings = ( #8594 #8592) end end object cxGrid1: TcxGrid Left = 313 Top = 30 Width = 600 Height = 503 Align = alClient PopupMenu = PopupMenu1 TabOrder = 2 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Kind = skCount Position = spFooter Column = v1Column7 end item Kind = skCount Column = v1Column7 end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skCount Column = v1Column7 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Content = DataLink_MYSC.Default10 Styles.Footer = DataLink_MYSC.Default10 Styles.Header = DataLink_MYSC.Default10 object v1Column1: TcxGridDBColumn Caption = #25171#21360#36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 74 end object v1Column4: TcxGridDBColumn Caption = #21306#22495 DataBinding.FieldName = 'QuYu' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 78 end object v1Column2: TcxGridDBColumn Caption = #20998#21306 DataBinding.FieldName = 'FenQu' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 77 end object v1Column5: TcxGridDBColumn Caption = #25490 DataBinding.FieldName = 'Pai' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 55 end object v1Column3: TcxGridDBColumn Caption = #23618 DataBinding.FieldName = 'Ceng' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 69 end object v1Column7: TcxGridDBColumn Caption = #24211#20301#21517#31216 DataBinding.FieldName = 'KWName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 224 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object Panel2: TPanel Left = 320 Top = 224 Width = 225 Height = 41 BevelOuter = bvNone 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 ADOTemp: TADOQuery Connection = DataLink_MYSC.ADOLink LockType = ltReadOnly Parameters = <> Left = 392 Top = 133 end object ADOCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 576 Top = 109 end object ADOQuery1: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 464 Top = 149 end object CDS_Print: TClientDataSet Aggregates = <> Params = <> Left = 408 Top = 142 end object RM1: 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 Dataset = RMDBMain CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 498 Top = 142 ReportData = {} end object RMDBMain: TRMDBDataSet Visible = True DataSet = CDS_Print Left = 560 Top = 128 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 344 Top = 166 end object DataSource1: TDataSource DataSet = ClientDataSet1 Left = 376 Top = 168 end object ClientDataSet2: TClientDataSet Aggregates = <> Params = <> Left = 440 Top = 174 end object PopupMenu1: TPopupMenu Left = 592 Top = 184 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end end end