object frmCaiWuHuiLV: TfrmCaiWuHuiLV Left = 190 Top = 136 Width = 1147 Height = 594 Caption = #27719#29575#20449#24687#31649#29702 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 107 TextHeight = 13 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1131 Height = 31 ButtonHeight = 30 ButtonWidth = 61 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Images = DataLink_YSYF.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 = 65 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 59 OnClick = ToolButton2Click end object TADD: TToolButton Left = 130 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = TADDClick end object TDel: TToolButton Left = 195 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 107 OnClick = TDelClick end object TSave: TToolButton Left = 260 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = TSaveClick end object ToolButton1: TToolButton Left = 325 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 53 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 390 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end object TSel: TToolButton Left = 455 Top = 0 AutoSize = True Caption = #36873#25321 ImageIndex = 41 Visible = False OnClick = TSelClick end end object Panel1: TPanel Left = 0 Top = 31 Width = 1131 Height = 41 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label2: TLabel Left = 43 Top = 14 Width = 52 Height = 13 Caption = #26597#35810#26085#26399 end object Label7: TLabel Left = 810 Top = 83 Width = 26 Height = 13 Caption = #21333#20215 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label1: TLabel Left = 232 Top = 13 Width = 26 Height = 13 Caption = #27719#29575 end object Label3: TLabel Left = 405 Top = 13 Width = 52 Height = 13 Caption = #20844#31169#31867#22411 end object Label4: TLabel Left = 464 Top = 74 Width = 273 Height = 13 Caption = #23458#25143#26159#25903#20184#23453#20184#27454#23601#26159#31169#36134#65292#38134#34892#36716#36134#23601#26159#20844#36134 end object begdate: TDateTimePicker Left = 98 Top = 10 Width = 105 Height = 21 Date = 41256.918237847230000000 Time = 41256.918237847230000000 ShowCheckbox = True TabOrder = 0 OnChange = begdateChange end object Edit1: TEdit Left = 836 Top = 79 Width = 71 Height = 20 TabOrder = 1 Visible = False end object Button1: TButton Left = 910 Top = 79 Width = 53 Height = 23 Caption = #30830#23450 TabOrder = 2 Visible = False OnClick = Button1Click end object HuiLV: TEdit Tag = 1 Left = 260 Top = 9 Width = 120 Height = 20 TabOrder = 3 OnChange = HuiLVChange end object GSType: TComboBox Tag = 2 Left = 459 Top = 9 Width = 110 Height = 21 ItemHeight = 13 TabOrder = 4 OnChange = GSTypeChange Items.Strings = ( #20844#36134 #31169#36134) end end object cxGrid2: TcxGrid Left = 0 Top = 72 Width = 1131 Height = 482 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 = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Header = DataLink_YSYF.Default object v2ssel: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'ssel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 50 end object v2Filler: TcxGridDBColumn Tag = 2 Caption = #30331#35760#20154 DataBinding.FieldName = 'Filler' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 91 end object V1BegDate: TcxGridDBColumn Tag = 2 Caption = #24320#22987#26085#26399 DataBinding.FieldName = 'BegDate' PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False HeaderAlignmentHorz = taCenter Width = 97 end object v2EndDate: TcxGridDBColumn Tag = 2 Caption = #32467#26463#26085#26399 DataBinding.FieldName = 'EndDate' PropertiesClassName = 'TcxDateEditProperties' HeaderAlignmentHorz = taCenter Width = 107 end object V1HuiLv: TcxGridDBColumn Tag = 2 Caption = #27719#29575 DataBinding.FieldName = 'HuiLv' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 103 end object v2GSType: TcxGridDBColumn Tag = 2 Caption = #20844#31169#31867#22411 DataBinding.FieldName = 'GSType' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2GSTypePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object v2Note: TcxGridDBColumn Tag = 2 Caption = #22791#27880 DataBinding.FieldName = 'Note' HeaderAlignmentHorz = taCenter Width = 147 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object ADOQueryTemp: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 789 Top = 9 end object ADOQueryCmd: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 829 Top = 1 end object ADOQueryMain: TADOQuery Connection = DataLink_YSYF.ADOLink LockType = ltReadOnly Parameters = <> Left = 505 Top = 221 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] DefaultCollate = False SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' PreviewOptions.RulerUnit = rmutScreenPixels PreviewOptions.RulerVisible = False PreviewOptions.DrawBorder = False PreviewOptions.BorderPen.Color = clGray PreviewOptions.BorderPen.Style = psDash Dataset = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 444 Top = 220 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True Left = 472 Top = 220 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 472 Top = 248 end object DS_HZ: TDataSource DataSet = CDS_HZ Left = 443 Top = 248 end object CDS_HZ: TClientDataSet Aggregates = <> Params = <> Left = 504 Top = 249 end object cxStyleRepository1: TcxStyleRepository object cxStyle1: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] TextColor = clRed end end object PopupMenu1: TPopupMenu Left = 415 Top = 222 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end end object ADOQuery1: TADOQuery Connection = DataLink_YSYF.ADOLink Parameters = <> Left = 861 Top = 73 end end