object frm_ch_fee_modify_view: Tfrm_ch_fee_modify_view Left = 192 Top = 107 BorderIcons = [] BorderStyle = bsDialog Caption = #23519#30475#36153#29992#20462#25913#36807#31243 ClientHeight = 359 ClientWidth = 622 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poDesktopCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object dxDBGrid1: TdxDBGrid Left = 0 Top = 0 Width = 622 Height = 176 Bands = < item end> DefaultLayout = True HeaderPanelRowCount = 1 KeyField = 'CH_ID' SummaryGroups = <> SummarySeparator = ', ' Align = alTop TabOrder = 0 DataSource = t_ch_fee1 Filter.Criteria = {00000000} OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks] OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap] object dxDBGrid1Column1: TdxDBGridColumn ReadOnly = True Width = 30 BandIndex = 0 RowIndex = 0 FieldName = #31867#22411 end object dxDBGrid1Column2: TdxDBGridColumn ReadOnly = True Width = 54 BandIndex = 0 RowIndex = 0 FieldName = #36153#29992#29366#24577 end object dxDBGrid1Column3: TdxDBGridColumn ReadOnly = True Width = 85 BandIndex = 0 RowIndex = 0 FieldName = #36153#29992#21517#31216 end object dxDBGrid1Column4: TdxDBGridColumn ReadOnly = True Width = 54 BandIndex = 0 RowIndex = 0 FieldName = #32467#31639#21333#20301 end object dxDBGrid1Column5: TdxDBGridColumn ReadOnly = True Width = 86 BandIndex = 0 RowIndex = 0 FieldName = #23458#25143#21517#31216 end object dxDBGrid1Column6: TdxDBGridColumn ReadOnly = True Width = 38 BandIndex = 0 RowIndex = 0 FieldName = #26631#20934 end object dxDBGrid1Column7: TdxDBGridColumn ReadOnly = True Width = 53 BandIndex = 0 RowIndex = 0 FieldName = #21333#20215 end object dxDBGrid1Column8: TdxDBGridColumn ReadOnly = True Width = 44 BandIndex = 0 RowIndex = 0 FieldName = #25968#37327 end object dxDBGrid1Column9: TdxDBGridColumn ReadOnly = True Width = 67 BandIndex = 0 RowIndex = 0 FieldName = #37329#39069 end object dxDBGrid1Column10: TdxDBGridColumn ReadOnly = True Width = 30 BandIndex = 0 RowIndex = 0 FieldName = #24065#21035 end object dxDBGrid1Column11: TdxDBGridColumn ReadOnly = True Width = 35 BandIndex = 0 RowIndex = 0 FieldName = #27719#29575 end end object dxDBGrid2: TdxDBGrid Left = 0 Top = 176 Width = 622 Height = 183 Bands = < item end> DefaultLayout = True HeaderPanelRowCount = 1 KeyField = 'MD_ID' SummaryGroups = <> SummarySeparator = ', ' Align = alClient TabOrder = 1 DataSource = t_ch_fee_balance1 Filter.Criteria = {00000000} OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks] OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap] object dxDBGrid2Column1: TdxDBGridColumn ReadOnly = True Width = 54 BandIndex = 0 RowIndex = 0 FieldName = #30003#35831#31867#22411 end object dxDBGrid2Column2: TdxDBGridColumn ReadOnly = True Width = 86 BandIndex = 0 RowIndex = 0 FieldName = #36153#29992#21517#31216 end object dxDBGrid2Column3: TdxDBGridColumn ReadOnly = True Width = 54 BandIndex = 0 RowIndex = 0 FieldName = #32467#31639#21333#20301 end object dxDBGrid2Column4: TdxDBGridColumn ReadOnly = True Width = 79 BandIndex = 0 RowIndex = 0 FieldName = #23458#25143#21517#31216 end object dxDBGrid2Column5: TdxDBGridColumn ReadOnly = True Width = 48 BandIndex = 0 RowIndex = 0 FieldName = #26631#20934 end object dxDBGrid2Column6: TdxDBGridColumn ReadOnly = True Width = 54 BandIndex = 0 RowIndex = 0 FieldName = #21333#20215 end object dxDBGrid2Column7: TdxDBGridColumn ReadOnly = True Width = 65 BandIndex = 0 RowIndex = 0 FieldName = #25968#37327 end object dxDBGrid2Column8: TdxDBGridColumn ReadOnly = True Width = 62 BandIndex = 0 RowIndex = 0 FieldName = #37329#39069 end object dxDBGrid2Column9: TdxDBGridColumn ReadOnly = True Width = 30 BandIndex = 0 RowIndex = 0 FieldName = #24065#21035 end object dxDBGrid2Column10: TdxDBGridColumn ReadOnly = True Width = 33 BandIndex = 0 RowIndex = 0 FieldName = #27719#29575 end object dxDBGrid2Column11: TdxDBGridColumn ReadOnly = True Width = 100 BandIndex = 0 RowIndex = 0 FieldName = #36153#29992#21407#22240 end object dxDBGrid2Column12: TdxDBGridColumn ReadOnly = True Width = 45 BandIndex = 0 RowIndex = 0 FieldName = #30003#35831#20154 end object dxDBGrid2Column13: TdxDBGridColumn ReadOnly = True Width = 75 BandIndex = 0 RowIndex = 0 FieldName = #30003#35831#26085#26399 end object dxDBGrid2Column14: TdxDBGridColumn ReadOnly = True Width = 46 BandIndex = 0 RowIndex = 0 FieldName = #23457#26680#20154 end object dxDBGrid2Column15: TdxDBGridColumn ReadOnly = True Width = 73 BandIndex = 0 RowIndex = 0 FieldName = #23457#26680#26085#26399 end end object bsBusinessSkinForm1: TbsBusinessSkinForm UseSkinFontInMenu = True ShowIcon = False MaximizeOnFullScreen = False AlphaBlend = False AlphaBlendAnimation = False AlphaBlendValue = 100 ShowObjectHint = False MenusAlphaBlend = False MenusAlphaBlendAnimation = False MenusAlphaBlendValue = 0 DefCaptionFont.Charset = GB2312_CHARSET DefCaptionFont.Color = clBtnText DefCaptionFont.Height = -12 DefCaptionFont.Name = #23435#20307 DefCaptionFont.Style = [] DefInActiveCaptionFont.Charset = GB2312_CHARSET DefInActiveCaptionFont.Color = clBtnShadow DefInActiveCaptionFont.Height = -12 DefInActiveCaptionFont.Name = #23435#20307 DefInActiveCaptionFont.Style = [] DefMenuItemHeight = 20 DefMenuItemFont.Charset = GB2312_CHARSET DefMenuItemFont.Color = clWindowText DefMenuItemFont.Height = -12 DefMenuItemFont.Name = #23435#20307 DefMenuItemFont.Style = [] UseDefaultSysMenu = True SkinData = frm_main.bsSkinData1 MinHeight = 0 MinWidth = 0 Magnetic = False MagneticSize = 10 BorderIcons = [biMinimize] Left = 208 Top = 220 end object t_ch_fee_balance1: TDataSource DataSet = t_ch_fee_balance Left = 248 Top = 256 end object t_ch_fee1: TDataSource Left = 208 Top = 256 end object t_ch_fee_balance: TADOQuery Connection = frm_main.db CursorType = ctStatic DataSource = t_ch_fee1 Parameters = < item Name = 'CH_ID' Attributes = [paSigned, paNullable] DataType = ftInteger Precision = 10 Size = 4 Value = 1073 end> SQL.Strings = ( 'select * from t_ch_fee_modify' 'where CH_ID=:CH_ID' 'order by FM_ID') Left = 248 Top = 216 end end