glb.dfm

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

inherited frmGlb: TfrmGlb
  Left = 2
  Top = 0
  Width = 795
  Height = 559
  Caption = '财务总帐初始化'
  OldCreateOrder = True
  WindowState = wsMaximized
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object sgGlb: TSDGrid [0]
    Left = 0
    Top = 39
    Width = 787
    Height = 421
    Align = alClient
    Color = 50331647
    ColCount = 12
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
    ParentCtl3D = False
    TabOrder = 2
    OnSelectCell = sgGlbSelectCell
    SelectColor = 12615680
    EvenGridColor = 50331647
    OddGridColor = 14806523
    Columns = <
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clBlack
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '科目编码'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clBlack
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '科目名称'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clBlack
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '明细'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clBlack
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '方向'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clBlack
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '币种'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clBlack
        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 = []
        CharType = gtNumeric
        TitleString = '期初数量'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clRed
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        CharType = gtNumeric
        TitleString = '期初金额'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clRed
        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
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clRed
        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 = (
      82
      124
      26
      25
      42
      49
      54
      81
      77
      58
      76
      73)
  end
  inherited sbBar: TStatusBar
    Top = 491
    Width = 787
  end
  inherited CoolBar1: TCoolBar
    Width = 787
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 787
      end>
    inherited tbMainBar: TToolBar
      Width = 774
      ButtonWidth = 43
      inherited tbAddHead: TToolButton
        Caption = '初始化'
      end
      inherited tbEditHead: TToolButton
        Left = 47
      end
      inherited tbDeleteHead: TToolButton
        Left = 82
        Visible = False
      end
      inherited ToolButton10: TToolButton
        Left = 117
      end
      inherited tbGenrate: TToolButton
        Left = 119
        Caption = '启用'
      end
      inherited ToolButton3: TToolButton
        Left = 154
      end
      inherited tbCancel: TToolButton
        Left = 156
      end
      inherited tbSave: TToolButton
        Left = 191
        Caption = '保存'
      end
      inherited ToolButton6: TToolButton
        Left = 226
      end
      inherited tbCheck: TToolButton
        Left = 228
        Caption = '试算'
        Visible = True
      end
      inherited tbClose: TToolButton
        Left = 263
      end
      inherited ToolButton1: TToolButton
        Left = 306
      end
      inherited tbFirst: TToolButton
        Left = 308
      end
      inherited tbPrevious: TToolButton
        Left = 343
      end
      inherited tbNext: TToolButton
        Left = 378
      end
      inherited tbLast: TToolButton
        Left = 413
      end
      inherited ToolButton2: TToolButton
        Left = 448
      end
      inherited tbQuery: TToolButton
        Left = 450
        Visible = False
      end
      inherited tbPrint: TToolButton
        Left = 485
      end
      inherited tbExport: TToolButton
        Left = 520
      end
      inherited ToolButton4: TToolButton
        Left = 555
      end
      inherited tbHelp: TToolButton
        Left = 557
      end
      inherited tbControl: TToolButton
        Left = 592
      end
    end
  end
  object Panel1: TPanel [3]
    Left = 0
    Top = 460
    Width = 787
    Height = 31
    Align = alBottom
    Color = clSilver
    TabOrder = 3
    object Bevel2: TBevel
      Left = 394
      Top = 6
      Width = 190
      Height = 20
    end
    object Bevel4: TBevel
      Left = 588
      Top = 6
      Width = 190
      Height = 20
    end
    object Bevel3: TBevel
      Left = 201
      Top = 6
      Width = 190
      Height = 20
    end
    object Bevel1: TBevel
      Left = 7
      Top = 6
      Width = 190
      Height = 20
    end
    object Label1: TLabel
      Left = 12
      Top = 10
      Width = 78
      Height = 12
      Caption = '期初借方合计:'
    end
    object Label2: TLabel
      Left = 207
      Top = 10
      Width = 78
      Height = 12
      Caption = '期初贷方合计:'
    end
    object labpJfAmtCount: TLabel
      Left = 91
      Top = 10
      Width = 66
      Height = 12
      Caption = 'pJfAmtCount'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object labpDfAmtCount: TLabel
      Left = 284
      Top = 10
      Width = 66
      Height = 12
      Caption = 'pDfAmtCount'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 398
      Top = 10
      Width = 78
      Height = 12
      Caption = '年初借方合计:'
    end
    object labyJfAmtCount: TLabel
      Left = 475
      Top = 10
      Width = 66
      Height = 12
      Caption = 'yJfAmtCount'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 593
      Top = 10
      Width = 78
      Height = 12
      Caption = '年初贷方合计:'
    end
    object labyDfAmtCount: TLabel
      Left = 672
      Top = 10
      Width = 66
      Height = 12
      Caption = 'yDfAmtCount'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 147
    Top = 267
    inherited muFile: TMenuItem
      inherited muAddDetail: TMenuItem
        Caption = '初始化(&N)'
      end
      inherited muEditDetail: TMenuItem
        Caption = '修改(&M)'
      end
      inherited muDeleteDetail: TMenuItem
        Visible = False
      end
      inherited muGenerate: TMenuItem
        Caption = '启用(&G)'
        OnClick = tbGenrateClick
      end
    end
  end
  inherited ImageList1: TImageList
    Left = 102
    Top = 252
  end
  inherited RecPrintDlg: TPrintDialog
    Left = 72
    Top = 167
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 142
    Top = 162
  end
  inherited SaveDataDlg: TSaveDialog
    Left = 175
    Top = 210
  end
end