jia.dfm

这是一套小型家庭理财软件delphi源代码

    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000FFF00FFFFFC003FFFF0000FFFE00007FFC00003FF800001FF800
    001FF000000FF000000FF000000FE0000007E0000007E0000007E0000007E000
    0007E0000007E0000007F000000FF000000FF800001FF800001FFC00003FFE00
    007FFF8001FFFFFE3FFFFE780FFFFC0003FFFC0081FFFE01E3FFFF87FFFFFFFF
    FFFFFFFFFFFF}
  OldCreateOrder = False
  Position = poDesktopCenter
  WindowState = wsMinimized
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar1: TStatusBar
    Left = 0
    Top = 529
    Width = 807
    Height = 19
    Panels = <
      item
        Text = #24635#35745': 0'#20803
        Width = 320
      end
      item
        Alignment = taCenter
        Width = 200
      end
      item
        BiDiMode = bdRightToLeftNoAlign
        ParentBiDiMode = False
        Width = 110
      end
      item
        Alignment = taCenter
        BiDiMode = bdRightToLeftNoAlign
        ParentBiDiMode = False
        Text = #30331#38470#26102#38388':2005-2-8 10:00'
        Width = 50
      end>
    SimplePanel = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 56
    Width = 807
    Height = 473
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel1'
    TabOrder = 1
    object Splitter1: TSplitter
      Left = 156
      Top = 0
      Width = 5
      Height = 473
      Cursor = crHSplit
    end
    object DBGrid1: TDBGrid
      Left = 161
      Top = 0
      Width = 646
      Height = 473
      Align = alClient
      Ctl3D = False
      DataSource = DataSource1
      FixedColor = clTeal
      Options = [dgTitles, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clMaroon
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = DBGrid1DblClick
      Columns = <
        item
          Expanded = False
          FieldName = 'DATE'
          Title.Alignment = taCenter
          Title.Caption = #26085#26399
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 60
          Visible = True
        end
        item
          Alignment = taCenter
          Color = 16777183
          Expanded = False
          FieldName = 'NAME'
          Title.Alignment = taCenter
          Title.Caption = #22995#21517
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 60
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'TYPE1'
          Title.Alignment = taCenter
          Title.Caption = #20998#21306
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 60
          Visible = True
        end
        item
          Alignment = taCenter
          Color = 16777183
          Expanded = False
          FieldName = 'TYPE2'
          Title.Alignment = taCenter
          Title.Caption = #20998#31867
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 70
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'TYPE3'
          Title.Alignment = taCenter
          Title.Caption = #39033#30446
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 70
          Visible = True
        end
        item
          Color = 16777183
          Expanded = False
          FieldName = 'MONEY'
          Title.Alignment = taCenter
          Title.Caption = #37329#39069
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 60
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'SPOT'
          Title.Alignment = taCenter
          Title.Caption = #22320#28857
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 70
          Visible = True
        end
        item
          Color = 16777183
          Expanded = False
          FieldName = 'MEMO'
          Title.Alignment = taCenter
          Title.Caption = #35814#32454#25551#36848
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWhite
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 175
          Visible = True
        end>
    end
    object Panel_DateUp: TPanel
      Left = 424
      Top = 216
      Width = 177
      Height = 41
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Caption = #25968#25454#32479#35745#20013'......'
      Color = clInactiveCaptionText
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 1
      Visible = False
    end
    object Panel3: TPanel
      Left = 0
      Top = 0
      Width = 156
      Height = 473
      Align = alLeft
      BevelOuter = bvNone
      Caption = 'Panel_left'
      TabOrder = 2
      object TreeView1: TTreeView
        Left = 0
        Top = 0
        Width = 156
        Height = 369
        Align = alTop
        AutoExpand = True
        BevelInner = bvNone
        BevelOuter = bvNone
        BiDiMode = bdLeftToRight
        Color = clTeal
        Ctl3D = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Images = ImageList1
        Indent = 19
        MultiSelectStyle = []
        ParentBiDiMode = False
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        ShowButtons = False
        SortType = stData
        StateImages = ImageList1
        TabOrder = 0
        ToolTips = False
        OnDblClick = TreeView1DblClick
        OnKeyPress = TreeView1KeyPress
      end
      object Panel4: TPanel
        Left = 0