zcfzshujuluru.dfm

本程序功能是将银行系统的月计表转换为所需要的资产负债表

object ZCFZShuJuWeiHuFrm: TZCFZShuJuWeiHuFrm
  Left = 188
  Top = 183
  AutoScroll = False
  BorderIcons = []
  Caption = #24405#20837#22269#24211#26376#35745#34920#25968#25454
  ClientHeight = 511
  ClientWidth = 673
  Color = clBtnFace
  Constraints.MinHeight = 50
  Constraints.MinWidth = 150
  DefaultMonitor = dmPrimary
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Label4: TbsSkinStdLabel
    Left = 32
    Top = 27
    Width = 70
    Height = 14
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Caption = #31185#30446#20195#21495#65306
  end
  object bsSkinStdLabel1: TbsSkinStdLabel
    Left = 32
    Top = 54
    Width = 112
    Height = 14
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Caption = #19978#26399#20511#26041#20313'  '#39069#65306
  end
  object Lbl1: TbsSkinStdLabel
    Left = 176
    Top = 8
    Width = 16
    Height = 33
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -32
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -29
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object bsSkinStdLabel2: TbsSkinStdLabel
    Left = 352
    Top = 54
    Width = 112
    Height = 14
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Caption = #19978#26399#36151#26041#20313'  '#39069#65306
  end
  object bsSkinStdLabel3: TbsSkinStdLabel
    Left = 32
    Top = 81
    Width = 112
    Height = 14
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Caption = #26412#26399#20511#26041#21457#29983#39069#65306
  end
  object bsSkinStdLabel4: TbsSkinStdLabel
    Left = 352
    Top = 81
    Width = 112
    Height = 14
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Caption = #26412#26399#36151#26041#21457#29983#39069#65306
  end
  object bsSkinStdLabel5: TbsSkinStdLabel
    Left = 32
    Top = 105
    Width = 112
    Height = 14
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Caption = #26412#26399#20511#26041#20313'  '#39069#65306
  end
  object bsSkinStdLabel6: TbsSkinStdLabel
    Left = 352
    Top = 105
    Width = 112
    Height = 14
    EllipsType = bsetNone
    UseSkinFont = True
    UseSkinColor = True
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    SkinDataName = 'stdlabel'
    Caption = #26412#26399#36151#26041#20313'  '#39069#65306
  end
  object kmdh: TbsSkinEdit
    Left = 96
    Top = 23
    Width = 65
    Height = 18
    DefaultColor = clWindow
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clBlack
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    UseSkinFont = True
    DefaultWidth = 0
    DefaultHeight = 0
    ButtonMode = False
    SkinData = ZCFZ_DM.bsSkinData1
    SkinDataName = 'edit'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = True
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
    OnEnter = kmdhEnter
    OnExit = kmdhExit
    OnKeyPress = kmdhKeyPress
  end
  object DBGridEh1: TDBGridEh
    Left = 32
    Top = 128
    Width = 617
    Height = 329
    TabStop = False
    DataSource = ZCFZ_DM.DataSource1
    EditActions = [geaDeleteEh, geaSelectAllEh]
    Flat = False
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -16
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    HorzScrollBar.Tracking = True
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
    TabOrder = 10
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -16
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    VertScrollBar.Tracking = True
    OnCellClick = DBGridEh1CellClick
    Columns = <
      item
        EditButtons = <>
        FieldName = 'kmdh'
        Footers = <>
        Title.Caption = #31185#30446#20195#21495
        Width = 70
      end
      item
        Alignment = taRightJustify
        DisplayFormat = '#,##0.00'
        EditButtons = <>
        FieldName = 'sqyejf'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #19978#26399#20511#26041#20313#39069
        Width = 150
      end
      item
        Alignment = taRightJustify
        Checkboxes = False
        DisplayFormat = '#,##0.00'
        EditButtons = <>
        FieldName = 'sqyedf'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #19978#26399#36151#26041#20313#39069
        Width = 150
      end
      item
        Alignment = taRightJustify
        DisplayFormat = '#,##0.00'
        EditButtons = <>
        FieldName = 'bqfsejf'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26412#26399#20511#26041#21457#29983#39069
        Width = 150
      end
      item
        Alignment = taRightJustify
        DisplayFormat = '#,##0.00'
        EditButtons = <>
        FieldName = 'bqfsedf'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26412#26399#36151#26041#21457#29983#39069
        Width = 150
      end
      item
        Alignment = taRightJustify
        DisplayFormat = '#,##0.00'
        EditButtons = <>
        FieldName = 'bqyejf'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26412#26399#20511#26041#20313#39069
        Width = 150
      end
      item
        Alignment = taRightJustify
        DisplayFormat = '#,##0.00'
        EditButtons = <>
        FieldName = 'bqyedf'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26412#26399#36151#26041#20313#39069
        Width = 150
      end>
  end
  object Btn3: TbsSkinButton
    Left = 363
    Top = 468
    Width = 177
    Height = 27
    TabOrder = 9
    SkinData = ZCFZ_DM.bsSkinData1
    SkinDataName = 'button'
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    ImageIndex = -1
    UseSkinSize = True
    UseSkinFontColor = True
    RepeatMode = False
    RepeatInterval = 100
    AllowAllUp = False
    TabStop = True
    CanFocused = True
    Down = False
    GroupIndex = 0
    Caption = #21024#38500#36873#23450#30340#34892
    NumGlyphs = 1
    Spacing = 1
    OnClick = btn3Click
  end
  object Btn2: TbsSkinButton
    Left = 555
    Top = 468
    Width = 97
    Height = 27
    TabOrder = 8
    SkinData = ZCFZ_DM.bsSkinData1
    SkinDataName = 'button'
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    ImageIndex = -1
    UseSkinSize = True
    UseSkinFontColor = True
    RepeatMode = False
    RepeatInterval = 100
    AllowAllUp = False
    TabStop = True
    CanFocused = True
    Down = False
    GroupIndex = 0
    Caption = #36820#12288#12288#22238
    NumGlyphs = 1
    Spacing = 1
    OnClick = Btn2Click
  end
  object Btn1: TbsSkinButton
    Left = 568
    Top = 13
    Width = 84
    Height = 27
    TabOrder = 7
    SkinData = ZCFZ_DM.bsSkinData1
    SkinDataName = 'button'
    DefaultFont.Charset = GB2312_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -14
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    ImageIndex = -1
    UseSkinSize = True
    UseSkinFontColor = True
    RepeatMode = False
    RepeatInterval = 100
    AllowAllUp = False
    TabStop = True
    CanFocused = True
    Down = False
    GroupIndex = 0
    Caption = #20445#23384
    NumGlyphs = 1
    Spacing = 1
    OnClick = Btn1Click
  end
  object sqyejf: TRzNumericEdit
    Left = 142
    Top = 52
    Width = 187
    Height = 24
    TabOrder = 1
    OnClick = sqyejfClick
    OnEnter = sqyejfEnter
    OnExit = sqyejfExit
    OnKeyDown = sqyejfKeyDown
    OnKeyPress = sqyejfKeyPress
    DisplayFormat = '#,##0.00'
  end
  object bqfsejf: TRzNumericEdit
    Left = 142
    Top = 76
    Width = 187
    Height = 24
    TabOrder = 3
    OnClick = sqyejfClick
    OnEnter = sqyejfEnter
    OnExit = sqyejfExit
    OnKeyDown = sqyejfKeyDown
    OnKeyPress = sqyejfKeyPress
    DisplayFormat = '#,##0.00'
  end
  object bqyejf: TRzNumericEdit
    Left = 142
    Top = 100
    Width = 187
    Height = 24
    TabOrder = 5
    OnClick = sqyejfClick
    OnEnter = sqyejfEnter
    OnExit = sqyejfExit
    OnKeyDown = sqyejfKeyDown
    OnKeyPress = bqyejfKeyPress
    DisplayFormat = '#,##0.00'
  end
  object sqyedf: TRzNumericEdit
    Left = 462
    Top = 52
    Width = 187
    Height = 24
    TabOrder = 2
    OnClick = sqyejfClick
    OnEnter = sqyejfEnter
    OnExit = sqyejfExit
    OnKeyDown = sqyejfKeyDown
    OnKeyPress = sqyejfKeyPress
    DisplayFormat = '#,##0.00'
  end
  object bqfsedf: TRzNumericEdit
    Left = 462
    Top = 76
    Width = 187
    Height = 24
    TabOrder = 4
    OnClick = sqyejfClick
    OnEnter = sqyejfEnter
    OnExit = sqyejfExit
    OnKeyDown = sqyejfKeyDown
    OnKeyPress = sqyejfKeyPress
    DisplayFormat = '#,##0.00'
  end
  object bqyedf: TRzNumericEdit
    Left = 462
    Top = 100
    Width = 187
    Height = 24
    TabOrder = 6
    OnClick = sqyejfClick
    OnEnter = sqyejfEnter
    OnExit = sqyejfExit
    OnKeyDown = sqyejfKeyDown
    OnKeyPress = bqyedfKeyPress
    DisplayFormat = '#,##0.00'
  end
  object bsBusinessSkinForm1: TbsBusinessSkinForm
    PositionInMonitor = bspDefault
    UseFormCursorInNCArea = True
    MaxMenuItemsInWindow = 0
    ClientWidth = 0
    ClientHeight = 0
    HideCaptionButtons = False
    AlwaysShowInTray = False
    LogoBitMapTransparent = False
    AlwaysMinimizeToTray = False
    UseSkinFontInMenu = True
    ShowIcon = False
    MaximizeOnFullScreen = False
    AlphaBlend = False
    AlphaBlendAnimation = False
    AlphaBlendValue = 200
    ShowObjectHint = False
    UseDefaultObjectHint = True
    MenusAlphaBlend = False
    MenusAlphaBlendAnimation = False
    MenusAlphaBlendValue = 200
    DefCaptionFont.Charset = GB2312_CHARSET
    DefCaptionFont.Color = clBtnText
    DefCaptionFont.Height = -14
    DefCaptionFont.Name = #23435#20307
    DefCaptionFont.Style = []
    DefInActiveCaptionFont.Charset = GB2312_CHARSET
    DefInActiveCaptionFont.Color = clBtnShadow
    DefInActiveCaptionFont.Height = -14
    DefInActiveCaptionFont.Name = #23435#20307
    DefInActiveCaptionFont.Style = [fsBold]
    DefMenuItemHeight = 20
    DefMenuItemFont.Charset = GB2312_CHARSET
    DefMenuItemFont.Color = clWindowText
    DefMenuItemFont.Height = -14
    DefMenuItemFont.Name = #23435#20307
    DefMenuItemFont.Style = []
    UseDefaultSysMenu = True
    SkinData = ZCFZ_DM.bsSkinData1
    MinHeight = 0
    MinWidth = 0
    MaxHeight = 0
    MaxWidth = 0
    Magnetic = False
    MagneticSize = 5
    BorderIcons = []
    Left = 32
    Top = 456
  end
end