object frmOtherFeeSave: TfrmOtherFeeSave Left = 213 Top = 134 Width = 1254 Height = 655 Caption = #36153#29992#30331#35760 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1246 Height = 31 ButtonHeight = 30 ButtonWidth = 83 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 = 63 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 59 OnClick = ToolButton2Click end object ToolButton1: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #25209#37327#20445#23384 ImageIndex = 111 Visible = False OnClick = ToolButton1Click end object TBSave: TToolButton Left = 213 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = TBSaveClick end object TBAdd: TToolButton Left = 276 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = TBAddClick end object TBDel: TToolButton Left = 339 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 17 OnClick = TBDelClick end object TBExport: TToolButton Left = 402 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 53 OnClick = TBExportClick end object TBClose: TToolButton Left = 465 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 31 Width = 1246 Height = 65 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label1: TLabel Left = 335 Top = 13 Width = 48 Height = 12 Caption = #36153#29992#21517#31216 end object Label3: TLabel Left = 182 Top = 13 Width = 52 Height = 12 Caption = #29992#20110#35746#21333 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 57 Top = 42 Width = 12 Height = 12 Caption = #33267 end object Label7: TLabel Left = 1068 Top = 16 Width = 24 Height = 12 Caption = #21333#20215 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label8: TLabel Left = 1114 Top = -2 Width = 48 Height = 12 Caption = #20844#21496#25260#22836 Visible = False end object Label11: TLabel Left = 168 Top = 42 Width = 66 Height = 12 Caption = #25910#36153#21333#20301'/'#20154 end object Label2: TLabel Left = 346 Top = 41 Width = 36 Height = 12 Caption = #32463#25163#20154 end object Label4: TLabel Left = 479 Top = 13 Width = 48 Height = 12 Caption = #36134#25143#21517#31216 end object Label5: TLabel Left = 479 Top = 41 Width = 48 Height = 12 Caption = #36153#29992#29992#36884 end object Label9: TLabel Left = 631 Top = 13 Width = 24 Height = 12 Caption = #22791#27880 end object yydd: TEdit Tag = 2 Left = 236 Top = 9 Width = 92 Height = 20 TabOrder = 0 OnChange = yyddChange OnKeyPress = yyddKeyPress end object begdate: TDateTimePicker Left = 72 Top = 9 Width = 87 Height = 20 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 1 end object Enddate: TDateTimePicker Left = 69 Top = 38 Width = 87 Height = 20 Date = 41256.918237847230000000 Time = 41256.918237847230000000 TabOrder = 2 end object Edit1: TEdit Left = 1096 Top = 12 Width = 65 Height = 20 TabOrder = 3 Visible = False end object Button1: TButton Left = 1164 Top = 12 Width = 49 Height = 21 Caption = #30830#23450 TabOrder = 4 Visible = False OnClick = Button1Click end object ComTaiTou: TEdit Tag = 2 Left = 1162 Top = -6 Width = 89 Height = 20 TabOrder = 5 Visible = False OnChange = yyddChange end object CheckBox1: TCheckBox Left = 5 Top = 11 Width = 68 Height = 17 Caption = #26597#35810#26085#26399 Checked = True State = cbChecked TabOrder = 6 end object FYNAME: TEdit Tag = 2 Left = 382 Top = 9 Width = 89 Height = 20 TabOrder = 7 OnChange = yyddChange end object SFDW: TEdit Tag = 2 Left = 238 Top = 38 Width = 89 Height = 20 TabOrder = 8 OnChange = yyddChange end object JSR: TEdit Tag = 2 Left = 382 Top = 37 Width = 89 Height = 20 TabOrder = 9 OnChange = yyddChange end object ZHMC: TEdit Tag = 2 Left = 530 Top = 9 Width = 89 Height = 20 TabOrder = 10 OnChange = yyddChange end object fyyt: TEdit Tag = 2 Left = 530 Top = 37 Width = 89 Height = 20 TabOrder = 11 OnChange = yyddChange end object Note: TEdit Tag = 2 Left = 659 Top = 9 Width = 89 Height = 20 TabOrder = 12 OnChange = yyddChange end end object cxGrid2: TcxGrid Left = 0 Top = 96 Width = 1246 Height = 528 Align = alClient TabOrder = 2 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.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 Column = VYB 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.Inactive = DataLink_YSYF.FoneRed Styles.IncSearch = DataLink_YSYF.FoneRed Styles.Selection = DataLink_YSYF.FoneRed Styles.Header = DataLink_YSYF.Default object Tv2Column1: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'ssel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 55 end object cxGridDBColumn1: TcxGridDBColumn Tag = 7 Caption = #26085#26399 DataBinding.FieldName = 'FYDATE' PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False Properties.OnEditValueChanged = cxGridDBColumn1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 104 end object cxGridDBColumn3: TcxGridDBColumn Tag = 7 Caption = #36153#29992#21517#31216 DataBinding.FieldName = 'FYNAME' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = cxGridDBColumn3PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 140 end object v2Column11: TcxGridDBColumn Tag = 7 Caption = #25910#36153#21333#20301'/'#20154 DataBinding.FieldName = 'SFDW' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column11PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 127 end object v2Column1: TcxGridDBColumn Tag = 7 Caption = #36134#25143#21517#31216 DataBinding.FieldName = 'ZHMC' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 82 end object v2Column2: TcxGridDBColumn Tag = 7 Caption = #36153#29992#35746#21333 DataBinding.FieldName = 'yydd' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v2Column2PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 99 end object VYB: TcxGridDBColumn Tag = 7 Caption = #37329#39069 DataBinding.FieldName = 'je' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 75 end object v2Column3: TcxGridDBColumn Tag = 7 Caption = #20184#27454#26041#24335 DataBinding.FieldName = 'PAYMENT' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( #20869#36134 #22806#36134) HeaderAlignmentHorz = taCenter Width = 74 end object v2Column4: TcxGridDBColumn Tag = 7 Caption = #36153#29992#29992#36884 DataBinding.FieldName = 'fyyt' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column4PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 76 end object v2Column5: TcxGridDBColumn Tag = 7 Caption = #32463#25163#20154 DataBinding.FieldName = 'JSR' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column5PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 76 end object v2Note: TcxGridDBColumn Tag = 7 Caption = #22791#27880 DataBinding.FieldName = 'Note' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2BatchNoPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 100 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object ADOQueryTemp: TADOQuery Connection = DataLink_YSYF.ADOLink LockType = ltReadOnly 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 = 309 Top = 193 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 = 448 Top = 208 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True Left = 376 Top = 208 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 544 Top = 208 end object DS_HZ: TDataSource DataSet = CDS_HZ Left = 515 Top = 211 end object CDS_HZ: TClientDataSet Aggregates = <> Params = <> Left = 480 Top = 208 end end