cashpd.dfm

晓风财务软件源码,具有财务软基本功能,仅供学习,勿商用,后果与本人无关 1、使用的第三方VCL: FastReport2.6中文版 EHLIB3 sncCurrency SUIPac

          3333333333333333333333333333333333333333333333000000333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333000000333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333333333333300
          0000333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333300000033333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333300000033333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333330000003333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333333333330000003333333333333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333330000003333333333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333000000444444444444
          4444444444444444444444444444444444444444444444444444444444444444
          4444444444444444444444000000AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
          AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA00
          0000}
        Stretch = True
      end>
    TitleBarDrawAppIcon = False
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    MenuBarColor = 15263976
    MenuBarHeight = 22
    RoundCorner = 0
    object Label10: TLabel
      Left = 193
      Top = 395
      Width = 36
      Height = 12
      Caption = #24405#20837#65306
      Transparent = True
    end
    object Label13: TLabel
      Left = 17
      Top = 395
      Width = 60
      Height = 12
      Caption = #36130#21153#20027#31649#65306
      Transparent = True
    end
    object g: TDBGridEh
      Left = 8
      Top = 136
      Width = 620
      Height = 249
      AllowedOperations = [alopInsertEh, alopUpdateEh, alopDeleteEh]
      Ctl3D = False
      DataSource = DataSource1
      FixedColor = clMoneyGreen
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      Options = [dgEditing, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghHighlightFocus, dghClearSelection]
      ParentCtl3D = False
      RowHeight = 16
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnColEnter = gColEnter
      OnColExit = gColExit
      OnDrawColumnCell = gDrawColumnCell
      OnExit = gExit
      OnKeyPress = gKeyPress
      Columns = <
        item
          EditButtons = <>
          FieldName = 'month'
          Footers = <>
          ReadOnly = True
          Width = 15
        end
        item
          DropDownBox.Columns = <
            item
            end
            item
            end
            item
            end
            item
            end>
          EditButtons = <>
          FieldName = 'day'
          Footers = <>
          Width = 18
        end
        item
          EditButtons = <>
          FieldName = 'EarningNumber'
          Footers = <>
          Width = 29
        end
        item
          EditButtons = <>
          FieldName = 'PayNumber'
          Footers = <>
          Width = 30
        end
        item
          ButtonStyle = cbsEllipsis
          EditButtons = <>
          FieldName = 'Summary'
          Footers = <>
          Width = 108
          OnEditButtonClick = gColumns4EditButtonClick
        end
        item
          ButtonStyle = cbsEllipsis
          EditButtons = <>
          FieldName = 'CodeLongSubjectName'
          Footers = <>
          ReadOnly = True
          Width = 146
          OnEditButtonClick = gColumns5EditButtonClick
        end
        item
          EditButtons = <>
          FieldName = 'J_Money'
          Footers = <>
          Title.ImageIndex = 0
          Width = 124
        end
        item
          EditButtons = <>
          FieldName = 'D_Money'
          Footers = <>
          Width = 123
        end>
    end
    object sncDBCurrencyInplaceEdit: TsncDBCurrencyEdit
      Left = 360
      Top = 176
      Width = 123
      Height = 25
      BorderStyle = bsNone
      CurrencySymbol = #65509
      DataSource = DataSource1
      DigitalNumber = 12
      NegativeFont.Charset = DEFAULT_CHARSET
      NegativeFont.Color = clWindowText
      NegativeFont.Height = -11
      NegativeFont.Name = 'MS Sans Serif'
      NegativeFont.Style = []
      ParentColor = False
      TabOrder = 2
      TabStop = True
      Visible = False
      OnMoveOut = sncDBCurrencyInplaceEditMoveOut
      OnEnter = sncDBCurrencyInplaceEditEnter
      OnExit = sncDBCurrencyInplaceEditExit
    end
    object Panel1: TPanel
      Left = 8
      Top = 88
      Width = 620
      Height = 49
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Color = clMoneyGreen
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 3
      object Label1: TLabel
        Left = 0
        Top = 6
        Width = 36
        Height = 12
        Alignment = taCenter
        Caption = '2004'#24180
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object sncCurrencyLabel3: TsncCurrencyLabel
        Left = 353
        Top = 24
        Width = 123
        Height = 25
        BorderStyle = bsNone
        Ctl3D = False
        DecimalSymbols.Strings = (
          #35282
          #20998)
        DigitalNumber = 12
        DigitalSymbols.Strings = (
          #20803
          #21313
          #30334
          #21315
          #19975
          #21313
          #30334
          #21315
          #20159
          #21313
          #30334
          #21315
          #19975)
        Color = clMoneyGreen
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object sncCurrencyLabel4: TsncCurrencyLabel
        Left = 477
        Top = 24
        Width = 123
        Height = 25
        BorderStyle = bsNone
        Ctl3D = False
        DecimalSymbols.Strings = (
          #35282
          #20998)
        DigitalNumber = 12
        DigitalSymbols.Strings = (
          #20803
          #21313
          #30334
          #21315
          #19975
          #21313
          #30334
          #21315
          #20159
          #21313
          #30334
          #21315
          #19975)
        Color = clMoneyGreen
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label3: TLabel
        Left = 114
        Top = 16
        Width = 72
        Height = 12
        Caption = #25688#12288#12288#12288#12288#35201
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end