main.dfm

家庭收支管理

object MainForm: TMainForm
  Left = 192
  Top = 107
  Width = 544
  Height = 375
  Caption = #23478#24237#25910#25903#31649#29702#31995#32479
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Image: TImage
    Left = 0
    Top = 0
    Width = 789
    Height = 81
    Align = alTop
    Stretch = True
  end
  object FlatButton1: TFlatButton
    Left = 8
    Top = 99
    Width = 153
    Height = 25
    Caption = #25910#25903#35760#36134
    TabOrder = 0
    OnClick = FlatButton1Click
  end
  object FlatButton3: TFlatButton
    Left = 8
    Top = 173
    Width = 153
    Height = 25
    Caption = #25910#25903#25253#21578
    TabOrder = 1
    OnClick = FlatButton3Click
  end
  object FlatButton5: TFlatButton
    Left = 8
    Top = 247
    Width = 153
    Height = 25
    Caption = #24080#25143#31649#29702
    TabOrder = 2
    OnClick = FlatButton5Click
  end
  object FlatButton7: TFlatButton
    Left = 8
    Top = 323
    Width = 153
    Height = 25
    Caption = #36864#20986
    TabOrder = 3
    OnClick = FlatButton7Click
  end
  object FlatButton2: TFlatButton
    Left = 8
    Top = 136
    Width = 153
    Height = 25
    Caption = #26597#35810#20132#26131#35760#24405
    TabOrder = 4
    OnClick = FlatButton2Click
  end
  object FlatButton4: TFlatButton
    Left = 8
    Top = 210
    Width = 153
    Height = 25
    Caption = #19968#33268#24615#26816#26597
    TabOrder = 5
    OnClick = FlatButton4Click
  end
  object FlatButton6: TFlatButton
    Left = 8
    Top = 285
    Width = 153
    Height = 25
    Caption = #32500#25252#20132#26131#31867#21035
    TabOrder = 6
    OnClick = FlatButton6Click
  end
  object FlatPanel1: TFlatPanel
    Left = 8
    Top = 377
    Width = 58
    Height = 28
    Caption = #29616#37329
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 7
  end
  object FlatPanel2: TFlatPanel
    Left = 65
    Top = 377
    Width = 95
    Height = 28
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 8
    object Label1: TLabel
      Left = 76
      Top = 8
      Width = 6
      Height = 12
      Alignment = taRightJustify
    end
  end
  object FlatPanel3: TFlatPanel
    Left = 8
    Top = 404
    Width = 58
    Height = 28
    Caption = #23384#27454
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 9
  end
  object FlatPanel4: TFlatPanel
    Left = 65
    Top = 404
    Width = 95
    Height = 28
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 10
    object Label2: TLabel
      Left = 76
      Top = 8
      Width = 6
      Height = 12
      Alignment = taRightJustify
    end
  end
  object FlatPanel7: TFlatPanel
    Left = 8
    Top = 458
    Width = 58
    Height = 28
    Caption = #36151#27454
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 11
  end
  object FlatPanel8: TFlatPanel
    Left = 65
    Top = 458
    Width = 95
    Height = 28
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 12
    object Label4: TLabel
      Left = 76
      Top = 8
      Width = 6
      Height = 12
      Alignment = taRightJustify
    end
  end
  object FlatPanel9: TFlatPanel
    Left = 8
    Top = 485
    Width = 58
    Height = 28
    Caption = #20854#20182
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 13
  end
  object FlatPanel10: TFlatPanel
    Left = 65
    Top = 485
    Width = 95
    Height = 28
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 14
    object Label5: TLabel
      Left = 76
      Top = 8
      Width = 6
      Height = 12
      Alignment = taRightJustify
    end
  end
  object DBGridEh: TDBGridEh
    Left = 184
    Top = 99
    Width = 605
    Height = 415
    AutoFitColWidths = True
    DataSource = DataForm.DataSource_Account
    Flat = True
    FooterColor = clMoneyGreen
    FooterFont.Charset = ANSI_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    RowHeight = 2
    RowLines = 1
    SumList.Active = True
    TabOrder = 15
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    TitleHeight = 15
    Columns = <
      item
        Alignment = taCenter
        EditButtons = <>
        FieldName = 'Account'
        Footers = <
          item
            Alignment = taCenter
            Value = #24635#35745
            ValueType = fvtStaticText
          end>
        Layout = tlCenter
        Title.Alignment = taCenter
        Title.Caption = #26680#31639#24080#21495
        Width = 52
      end
      item
        EditButtons = <>
        FieldName = 'AccountName'
        Footers = <
          item
            Alignment = taCenter
            FieldName = 'AccountName'
            ValueType = fvtCount
          end>
        Layout = tlCenter
        Title.Alignment = taCenter
        Title.Caption = #24080#25143#21517#31216
        Width = 89
      end
      item
        EditButtons = <>
        FieldName = 'BankAccount'
        Footers = <>
        Layout = tlCenter
        Title.Alignment = taCenter
        Title.Caption = #38134#34892#24080#21495
        Width = 72
      end
      item
        DisplayFormat = '#,##0.00'
        EditButtons = <>
        FieldName = 'Present'
        Footers = <
          item
            DisplayFormat = '#,##0.00'
            FieldName = 'Present'
            ValueType = fvtSum
          end>
        Layout = tlCenter
        Title.Alignment = taCenter
        Title.Caption = #20313#39069
        Width = 68
      end>
  end
  object FlatPanel5: TFlatPanel
    Left = 8
    Top = 431
    Width = 58
    Height = 28
    Caption = #25237#36164
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 16
  end
  object FlatPanel6: TFlatPanel
    Left = 65
    Top = 431
    Width = 95
    Height = 28
    ParentColor = True
    ColorHighLight = clBlue
    ColorShadow = clBlue
    TabOrder = 17
    object Label3: TLabel
      Left = 76
      Top = 8
      Width = 6
      Height = 12
      Alignment = taRightJustify
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 514
    Width = 789
    Height = 19
    Panels = <
      item
        Alignment = taCenter
        Text = #23601#32490
        Width = 100
      end
      item
        Alignment = taCenter
        Width = 200
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 128
    Top = 72
  end
end