getmoney.~dfm

一个图书批发商的通用软件

object frmGetMoney: TfrmGetMoney
  Left = 48
  Top = 50
  Width = 782
  Height = 514
  Caption = #39044#25910#25910#27454
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 26
    Width = 774
    Height = 58
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Label2: TLabel
      Left = 120
      Top = 16
      Width = 60
      Height = 12
      Caption = #21333#20301#32534#21495#65306
    end
    object Label3: TLabel
      Left = 120
      Top = 42
      Width = 60
      Height = 12
      Caption = #24212#25910#36134#27454#65306
    end
    object Label4: TLabel
      Left = 298
      Top = 42
      Width = 36
      Height = 12
      Caption = #36824#27454#65306
    end
    object Label1: TLabel
      Left = 13
      Top = 10
      Width = 96
      Height = 24
      Caption = #39044#25910#25910#27454
      Color = clBtnFace
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -24
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label5: TLabel
      Left = 443
      Top = 42
      Width = 36
      Height = 12
      Caption = #27424#27454#65306
    end
    object Label6: TLabel
      Left = 288
      Top = 16
      Width = 60
      Height = 12
      Caption = #21333#20301#21517#31216#65306
    end
    object cxLookupComboBox1: TcxLookupComboBox
      Left = 184
      Top = 12
      Width = 89
      Height = 20
      Properties.DropDownAutoSize = True
      Properties.KeyFieldNames = 'ClientId'
      Properties.ListColumns = <
        item
          Caption = #32534#21495
          HeaderAlignment = taCenter
          Width = 50
          FieldName = 'ClientId'
        end
        item
          Caption = #21517#31216
          HeaderAlignment = taCenter
          Width = 120
          FieldName = 'ClientName'
        end>
      Properties.ListSource = DataSource1
      Properties.OnChange = cxLookupComboBox1PropertiesChange
      Style.BorderStyle = ebs3D
      TabOrder = 0
    end
    object dxEdit1: TdxEdit
      Left = 183
      Top = 38
      Width = 91
      Color = clBtnFace
      TabOrder = 1
      Alignment = taRightJustify
      ReadOnly = True
      StoredValues = 65
    end
    object dxEdit2: TdxEdit
      Left = 332
      Top = 38
      Width = 90
      Color = clBtnFace
      TabOrder = 2
      Alignment = taRightJustify
      ReadOnly = True
      StoredValues = 65
    end
    object dxEdit3: TdxEdit
      Left = 477
      Top = 38
      Width = 90
      Color = clBtnFace
      TabOrder = 3
      Alignment = taRightJustify
      ReadOnly = True
      StoredValues = 65
    end
    object Edit1: TEdit
      Left = 348
      Top = 12
      Width = 219
      Height = 20
      ReadOnly = True
      TabOrder = 4
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 84
    Width = 774
    Height = 396
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 5
    object GroupBox2: TGroupBox
      Left = 0
      Top = 0
      Width = 774
      Height = 396
      Align = alClient
      Caption = #36824#27454#35760#24405
      TabOrder = 0
      object dxDBGrid2: TdxDBGrid
        Left = 2
        Top = 14
        Width = 770
        Height = 380
        Bands = <
          item
          end>
        DefaultLayout = True
        HeaderPanelRowCount = 1
        SummaryGroups = <>
        SummarySeparator = ', '
        Align = alClient
        TabOrder = 0
        DataSource = DataSource3
        Filter.Criteria = {00000000}
        OptionsView = [edgoUseBitmap]
        ScrollBars = ssVertical
        object dxDBGrid2UnitId: TdxDBGridColumn
          Caption = #21333#20301#32534#21495
          HeaderAlignment = taCenter
          Width = 100
          BandIndex = 0
          RowIndex = 0
          FieldName = 'UnitId'
        end
        object dxDBGrid2InDate: TdxDBGridDateColumn
          Caption = #20132#27454#26085#26399
          HeaderAlignment = taCenter
          Width = 120
          BandIndex = 0
          RowIndex = 0
          FieldName = 'InDate'
        end
        object dxDBGrid2GetMoney: TdxDBGridMaskColumn
          Caption = #37329#39069
          HeaderAlignment = taCenter
          Width = 60
          BandIndex = 0
          RowIndex = 0
          FieldName = 'GetMoney'
        end
        object dxDBGrid2Column4: TdxDBGridPickColumn
          Caption = #20184#27454#26041#24335
          HeaderAlignment = taCenter
          Width = 60
          BandIndex = 0
          RowIndex = 0
          FieldName = 'MoneyMode'
          Items.Strings = (
            #29616#37329
            #25903#31080
            #30005#27719
            #36716#36134
            #20854#23427)
        end
        object dxDBGrid2Column5: TdxDBGridPickColumn
          Caption = #26159#21542#32467#28165
          HeaderAlignment = taCenter
          Width = 60
          BandIndex = 0
          RowIndex = 0
          FieldName = #22791#27880
          Items.Strings = (
            #24050#28165
            #26410#28165)
        end
      end
    end
  end
  object dxBarManager1: TdxBarManager
    Scaled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Bars = <
      item
        AllowClose = False
        AllowCustomizing = False
        AllowQuickCustomizing = False
        AllowReset = False
        Caption = #24037#20855#26639
        DockedDockingStyle = dsTop
        DockedLeft = 0
        DockedTop = 0
        DockingStyle = dsTop
        FloatLeft = 29
        FloatTop = 200
        FloatClientWidth = 56
        FloatClientHeight = 88
        ItemLinks = <
          item
            Item = dxBarLargeButton1
            Visible = True
          end
          item
            Item = dxBarLargeButton3
            Visible = True
          end
          item
            Item = dxBarLargeButton2