⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 arob.dfm

📁 一个以前收集的基于C/S架构的ERP客户端源代码
💻 DFM
字号:
inherited frmArob: TfrmArob
  Left = 46
  Top = 30
  Width = 728
  Height = 563
  Caption = '其他应收单'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 495
    Width = 720
  end
  inherited CoolBar1: TCoolBar
    Width = 720
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 720
      end>
    inherited tbMainBar: TToolBar
      Width = 707
      inherited tbCheck: TToolButton
        Visible = True
      end
    end
  end
  object sgArob: TSDGrid [2]
    Left = 0
    Top = 39
    Width = 317
    Height = 419
    Align = alLeft
    Color = 50331647
    ColCount = 4
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    RowCount = 4
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 2
    OnClick = sgArobClick
    EvenGridColor = 50331647
    OddGridColor = 50331647
    Columns = <
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '应收单号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '客户'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clRed
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '红字'
        ColumnWidth = 0
      end>
    ColWidths = (
      10
      79
      129
      84)
  end
  object FloatPanel1: TFloatPanel [3]
    Left = 317
    Top = 39
    Width = 403
    Height = 419
    Align = alClient
    Color = 50331647
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 3
    object Label1: TLabel
      Left = 27
      Top = 17
      Width = 60
      Height = 12
      Caption = '应收单号:'
    end
    object Label2: TLabel
      Left = 27
      Top = 45
      Width = 60
      Height = 12
      Caption = '财务月份:'
    end
    object Label3: TLabel
      Left = 22
      Top = 344
      Width = 48
      Height = 12
      Caption = '备  注:'
    end
    object Label5: TLabel
      Left = 27
      Top = 73
      Width = 48
      Height = 12
      Caption = '日  期:'
    end
    object Label11: TLabel
      Left = 25
      Top = 248
      Width = 60
      Height = 12
      Caption = '应收金额:'
    end
    object seArobCode: TSDEdit
      Left = 89
      Top = 13
      Width = 136
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 0
      Text = 'seArobCode'
      OnExit = seArobCodeExit
      SplitSymbol = ' | '
    end
    object memArobDesc: TMemo
      Left = 20
      Top = 359
      Width = 365
      Height = 42
      Color = 50331647
      Ctl3D = False
      Lines.Strings = (
        'memArobDesc')
      ParentCtl3D = False
      TabOrder = 8
    end
    object seArobFmonth: TSDEdit
      Left = 91
      Top = 38
      Width = 136
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 1
      Text = 'seArobFmonth'
      SplitSymbol = ' | '
    end
    object deArobDate: TDateEdit
      Left = 93
      Top = 68
      Width = 133
      Height = 18
      LineOffset = 2
      LineColor = clGreen
      LineVisible = False
      CDate = '2003-04-09'
      InitDate = '2003-04-09 11:33:25'
      ModalResult = 0
      TabOrder = 2
      Color = -2113929211
      Ctl3D = False
      ParentCtl3D = False
    end
    object GroupBox1: TGroupBox
      Left = 20
      Top = 93
      Width = 364
      Height = 55
      Enabled = False
      TabOrder = 4
      object Label12: TLabel
        Left = 7
        Top = 31
        Width = 72
        Height = 12
        Caption = '原应收单号:'
      end
      object seArobDocCode: TSDEdit
        Left = 80
        Top = 25
        Width = 120
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 0
        Text = 'seArobDocCode'
        CharType = ctMathematic
        OnButtonClick = seArobDocCodeButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
      end
    end
    object GroupBox2: TGroupBox
      Left = 20
      Top = 277
      Width = 364
      Height = 68
      Caption = '参考金额'
      Enabled = False
      TabOrder = 6
      object Label21: TLabel
        Left = 6
        Top = 24
        Width = 60
        Height = 12
        Caption = '核销金额:'
      end
      object Label22: TLabel
        Left = 186
        Top = 23
        Width = 60
        Height = 12
        Caption = '坏账金额:'
      end
      object Label9: TLabel
        Left = 6
        Top = 45
        Width = 60
        Height = 12
        Caption = '红冲金额:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object seArobCAmt: TSDEdit
        Left = 68
        Top = 18
        Width = 97
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 0
        Text = 'seArobCAmt'
        CharType = ctMathematic
        SplitSymbol = ' | '
      end
      object seArobBAmt: TSDEdit
        Left = 250
        Top = 17
        Width = 90
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 1
        Text = 'seArobBAmt'
        CharType = ctMathematic
        SplitSymbol = ' | '
      end
      object seArobRAmt: TSDEdit
        Left = 69
        Top = 41
        Width = 96
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 2
        Text = 'seArobRAmt'
        CharType = ctMathematic
        SplitSymbol = ' | '
      end
    end
    object GroupBox3: TGroupBox
      Left = 20
      Top = 156
      Width = 364
      Height = 77
      Caption = '应收详细资料'
      TabOrder = 5
      object Label8: TLabel
        Left = 205
        Top = 56
        Width = 48
        Height = 12
        Caption = '汇  率:'
      end
      object Label7: TLabel
        Left = 8
        Top = 56
        Width = 48
        Height = 12
        Caption = '币  种:'
      end
      object Label6: TLabel
        Left = 6
        Top = 27
        Width = 60
        Height = 12
        Caption = '客户名称:'
      end
      object Label4: TLabel
        Left = 205
        Top = 25
        Width = 60
        Height = 12
        Caption = '应收日期:'
      end
      object seArobEnrate: TSDEdit
        Left = 262
        Top = 50
        Width = 92
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 0
        Text = 'seArobEnrate'
        CharType = ctMathematic
        SplitSymbol = ' | '
      end
      object scArobCurrency: TSDComboBox
        Left = 71
        Top = 50
        Width = 130
        Height = 20
        Style = csDropDownList
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 1
        OnClick = scArobCurrencyClick
        KeyItem = cbItem2
      end
      object scArobClient: TSDComboBox
        Left = 72
        Top = 20
        Width = 129
        Height = 20
        Style = csDropDownList
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 2
        KeyItem = cbItem2
      end
      object deArobRDate: TDateEdit
        Left = 262
        Top = 22
        Width = 93
        Height = 18
        LineOffset = 2
        LineColor = clGreen
        LineVisible = False
        CDate = '2003-04-09'
        InitDate = '2003-04-09 11:33:25'
        ModalResult = 0
        TabOrder = 3
        Color = -2113929211
        Ctl3D = False
        ParentCtl3D = False
      end
    end
    object chkArobRed: TCheckBox
      Left = 30
      Top = 90
      Width = 83
      Height = 17
      Caption = '红字应收单'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = chkArobRedClick
    end
    object seArobAmt: TSDEdit
      Left = 86
      Top = 245
      Width = 112
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 7
      Text = 'seArobAmt'
      CharType = ctMathematic
      SplitSymbol = ' | '
    end
  end
  object FloatPanel2: TFloatPanel [4]
    Left = 0
    Top = 458
    Width = 720
    Height = 37
    Align = alBottom
    Color = clWhite
    Enabled = False
    Caption = 'FloatPanel2'
    ParentColor = False
    TabOrder = 4
    object Label17: TLabel
      Left = 180
      Top = 7
      Width = 48
      Height = 12
      Caption = '审核人:'
    end
    object Label18: TLabel
      Left = 547
      Top = 7
      Width = 48
      Height = 12
      Caption = '操作员:'
    end
    object Label19: TLabel
      Left = 343
      Top = 7
      Width = 60
      Height = 12
      Caption = '审核日期:'
    end
    object lblArobChecker: TLabel
      Left = 227
      Top = 7
      Width = 73
      Height = 12
      AutoSize = False
      Caption = 'lblArobChecker'
    end
    object lblArobCheckDate: TLabel
      Left = 403
      Top = 6
      Width = 102
      Height = 12
      AutoSize = False
      Caption = 'lblArobCheckDate'
    end
    object lblArobUser: TLabel
      Left = 594
      Top = 7
      Width = 85
      Height = 12
      AutoSize = False
      Caption = 'lblArobUser'
    end
    object chkArobCheck: TCheckBox
      Left = 75
      Top = 7
      Width = 65
      Height = 17
      Caption = '单已审核'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 666
    Top = 3
  end
  inherited ImageList1: TImageList
    Left = 633
    Top = 2
  end
  inherited RecPrintDlg: TPrintDialog
    Left = 563
    Top = 65535
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 595
    Top = 65535
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -