arcl.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 350 行

inherited frmArcl: TfrmArcl
  Left = 86
  Top = 48
  Width = 638
  Height = 452
  Caption = '初始化应收货币账'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 384
    Width = 630
  end
  inherited CoolBar1: TCoolBar
    Width = 630
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 630
      end>
    inherited tbMainBar: TToolBar
      Width = 617
      inherited tbEditHead: TToolButton
        Visible = False
      end
      inherited tbDeleteHead: TToolButton
        Visible = False
      end
      inherited tbFirst: TToolButton
        Visible = False
      end
      inherited tbPrevious: TToolButton
        Visible = False
      end
      inherited tbNext: TToolButton
        Visible = False
      end
      inherited tbLast: TToolButton
        Visible = False
      end
    end
  end
  object sgArcl: TSDGrid [2]
    Left = 0
    Top = 78
    Width = 313
    Height = 306
    Align = alLeft
    Color = 50331647
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    RowCount = 4
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 2
    OnClick = sgArclClick
    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 = 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>
    ColWidths = (
      10
      78
      77
      71
      64)
  end
  object FloatPanel1: TFloatPanel [3]
    Left = 313
    Top = 78
    Width = 317
    Height = 306
    Align = alClient
    Color = 50331647
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 3
    object Label2: TLabel
      Left = 28
      Top = 20
      Width = 48
      Height = 12
      Caption = '币  种：'
    end
    object Label3: TLabel
      Left = 28
      Top = 90
      Width = 60
      Height = 12
      Caption = '年初金额：'
    end
    object Label5: TLabel
      Left = 28
      Top = 159
      Width = 72
      Height = 12
      Caption = '本年发生额：'
    end
    object Label6: TLabel
      Left = 28
      Top = 125
      Width = 84
      Height = 12
      Caption = '本币年初金额：'
    end
    object Label7: TLabel
      Left = 28
      Top = 194
      Width = 96
      Height = 12
      Caption = '本币本年发生额：'
    end
    object Label8: TLabel
      Left = 28
      Top = 55
      Width = 54
      Height = 12
      Caption = '财务月份:'
      Enabled = False
    end
    object Label4: TLabel
      Left = 28
      Top = 229
      Width = 72
      Height = 12
      Caption = '本年收款额：'
    end
    object Label9: TLabel
      Left = 28
      Top = 264
      Width = 96
      Height = 12
      Caption = '本币本年收款额：'
    end
    object seArclBoyAmt: TSDEdit
      Left = 120
      Top = 84
      Width = 150
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 2
      Text = 'seArclBoyAmt'
      OnExit = seArclBoyAmtExit
      CharType = ctMathematic
      SplitSymbol = ' | '
    end
    object seArclIoyAmt: TSDEdit
      Left = 120
      Top = 154
      Width = 150
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 4
      Text = 'seArclIoyAmt'
      OnExit = seArclBoyAmtExit
      CharType = ctMathematic
      SplitSymbol = ' | '
    end
    object seArclNBoyAmt: TSDEdit
      Left = 120
      Top = 119
      Width = 150
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 3
      Text = 'seArclNBoyAmt'
      CharType = ctMathematic
      SplitSymbol = ' | '
    end
    object seArclNIoyAmt: TSDEdit
      Left = 120
      Top = 189
      Width = 150
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 5
      Text = 'seArclNIoyAmt'
      CharType = ctMathematic
      SplitSymbol = ' | '
    end
    object scArclCurrency: TSDComboBox
      Left = 120
      Top = 14
      Width = 151
      Height = 20
      Style = csDropDownList
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 0
      OnClick = scArclCurrencyClick
      KeyItem = cbItem2
    end
    object seArclFmonth: TSDEdit
      Left = 120
      Top = 49
      Width = 150
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 1
      Text = 'seArclFmonth'
      SplitSymbol = ' | '
    end
    object seArclOoyAmt: TSDEdit
      Left = 120
      Top = 224
      Width = 150
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 6
      Text = 'seArclOoyAmt'
      OnExit = seArclBoyAmtExit
      CharType = ctMathematic
      SplitSymbol = ' | '
    end
    object seArclNOoyAmt: TSDEdit
      Left = 120
      Top = 259
      Width = 150
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 7
      Text = 'seArclNOoyAmt'
      CharType = ctMathematic
      SplitSymbol = ' | '
    end
  end
  object FloatPanel2: TFloatPanel [4]
    Left = 0
    Top = 39
    Width = 630
    Height = 39
    Align = alTop
    Color = clWhite
    ParentColor = False
    TabOrder = 4
    object labLgLocName: TLabel
      Left = 256
      Top = 13
      Width = 6
      Height = 12
    end
    object Label1: TLabel
      Left = 20
      Top = 11
      Width = 48
      Height = 12
      Caption = '客  户：'
    end
    object scArclClient: TSDComboBox
      Left = 70
      Top = 6
      Width = 190
      Height = 20
      Style = csDropDownList
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 0
      OnClick = scArclClientClick
      KeyItem = cbItem2
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 586
    Top = 147
    inherited muFile: TMenuItem
      inherited muEditDetail: TMenuItem
        Visible = False
      end
      inherited muDeleteDetail: TMenuItem
        Visible = False
      end
    end
  end
  inherited ImageList1: TImageList
    Left = 585
    Top = 114
  end
  inherited RecPrintDlg: TPrintDialog
    Left = 587
    Top = 47
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 587
    Top = 79
  end
end