frmmoneyu.dfm

图书借阅管理系统含源代码

object frmMoney: TfrmMoney
  Left = 288
  Top = 125
  AutoScroll = False
  Caption = #25910#25903#32479#35745
  ClientHeight = 246
  ClientWidth = 425
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label3: TLabel
    Left = 8
    Top = 216
    Width = 36
    Height = 13
    Caption = #21512#35745#65306
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 425
    Height = 209
    Align = alTop
    Caption = #25910#25903#32479#35745
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 12
      Height = 13
      Caption = #30001
    end
    object Label2: TLabel
      Left = 176
      Top = 24
      Width = 12
      Height = 13
      Caption = #21040
    end
    object dtDate1: TDateTimePicker
      Left = 32
      Top = 24
      Width = 137
      Height = 21
      Date = 38863.870601666670000000
      Time = 38863.870601666670000000
      DateFormat = dfLong
      TabOrder = 0
    end
    object dtDate2: TDateTimePicker
      Left = 200
      Top = 24
      Width = 137
      Height = 21
      Date = 38863.870601666670000000
      Time = 38863.870601666670000000
      DateFormat = dfLong
      TabOrder = 1
    end
    object btnMoney: TBitBtn
      Left = 344
      Top = 24
      Width = 75
      Height = 25
      Caption = #26597#30475'(&S)'
      Default = True
      TabOrder = 2
      OnClick = btnMoneyClick
    end
    object cxGridName: TcxGrid
      Left = 2
      Top = 56
      Width = 421
      Height = 151
      Align = alBottom
      BevelKind = bkSoft
      TabOrder = 3
      object cxGridDBTableView2: TcxGridDBTableView
        DataController.DataSource = dsMoney
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        NavigatorButtons.ConfirmDelete = False
        OptionsBehavior.DragHighlighting = False
        OptionsBehavior.DragOpening = False
        OptionsBehavior.DragScrolling = False
        OptionsBehavior.ImmediateEditor = False
        OptionsBehavior.ExpandMasterRowOnDblClick = False
        OptionsCustomize.ColumnFiltering = False
        OptionsCustomize.ColumnGrouping = False
        OptionsCustomize.ColumnHidingOnGrouping = False
        OptionsCustomize.ColumnMoving = False
        OptionsData.CancelOnExit = False
        OptionsData.Deleting = False
        OptionsData.DeletingConfirmation = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.CellSelect = False
        OptionsView.CellAutoHeight = True
        OptionsView.GroupByBox = False
        Styles.ContentOdd = cxStyle2
        Styles.Selection = cxStyle3
        Styles.Header = cxStyle1
        object cxGridDBTableView2DBColumn1: TcxGridDBColumn
          Caption = #26085#26399
          DataBinding.FieldName = 'Date'
          Width = 100
        end
        object cxGridDBTableView2DBColumn2: TcxGridDBColumn
          Caption = #20511#20070#35777
          DataBinding.FieldName = 'LeaseNo'
          Width = 100
        end
        object cxGridDBTableView2DBColumn3: TcxGridDBColumn
          Caption = #25353#37329
          DataBinding.FieldName = 'PressGold'
          Width = 45
        end
        object cxGridDBTableView2DBColumn4: TcxGridDBColumn
          Caption = #21253#26376#37329
          DataBinding.FieldName = 'Balance'
          Width = 45
        end
        object cxGridDBTableView2DBColumn6: TcxGridDBColumn
          Caption = #39044#20184#37329
          DataBinding.FieldName = 'Balance'
          Width = 45
        end
        object cxGridDBTableView2DBColumn5: TcxGridDBColumn
          Caption = #20914#20540#24615#36136#65288'0'#20026#20914#20540#65292'1'#20026#36864#38065#65289
          DataBinding.FieldName = 'WTWK'
          Width = 180
        end
      end
      object cxGridNameLevel1: TcxGridLevel
        GridView = cxGridDBTableView2
      end
    end
  end
  object btnClose: TBitBtn
    Left = 344
    Top = 216
    Width = 75
    Height = 25
    Cancel = True
    Caption = #20851#38381'(&C)'
    TabOrder = 1
    OnClick = btnCloseClick
  end
  object edMoney: TEdit
    Left = 48
    Top = 216
    Width = 121
    Height = 21
    TabOrder = 2
    Text = 'edMoney'
    OnKeyPress = edMoneyKeyPress
  end
  object cxStyleRepository1: TcxStyleRepository
    Left = 280
    Top = 216
    object cxStyle1: TcxStyle
      AssignedValues = [svColor, svFont, svTextColor]
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      TextColor = clAppWorkSpace
    end
    object cxStyle2: TcxStyle
      AssignedValues = [svColor, svFont, svTextColor]
      Color = clGradientActiveCaption
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      TextColor = clCaptionText
    end
    object cxStyle3: TcxStyle
      AssignedValues = [svColor, svFont, svTextColor]
      Color = clInfoBk
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      TextColor = clBtnText
    end
  end
  object dsMoney: TDataSource
    DataSet = DM.adoMoney
    Left = 312
    Top = 216
  end
end