pzh.dfm

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

inherited frmPzh: TfrmPzh
  Left = 15
  Top = 48
  Width = 778
  Height = 480
  Caption = '凭证的录入维护'
  Color = clMenu
  OldCreateOrder = True
  OnKeyDown = nil
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object fpGrid: TPanel [0]
    Left = 0
    Top = 98
    Width = 770
    Height = 281
    Align = alClient
    Caption = ' '
    Color = clWhite
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 4
    object sgPzh: TSDGrid
      Left = 1
      Top = 1
      Width = 768
      Height = 246
      Align = alClient
      ColCount = 8
      Ctl3D = False
      DefaultRowHeight = 18
      FixedColor = 8564917
      FixedCols = 0
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goRowSizing, goColSizing, goRowSelect]
      ParentCtl3D = False
      TabOrder = 0
      OnClick = sgPzhClick
      OnDblClick = sgPzhDblClick
      SelectColor = 12615680
      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
          EditType = sdEdit
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clBlack
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haRight
          CharType = gtNumeric
          TitleString = '汇率'
          ColumnWidth = 0
        end
        item
          EditType = sdEdit
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clBlack
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haRight
          CharType = gtNumeric
          TitleString = '原币金额'
          ColumnWidth = 0
        end
        item
          EditType = sdEdit
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clRed
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haRight
          CharType = gtNumeric
          TitleString = '借方金额'
          ColumnWidth = 0
        end
        item
          EditType = sdEdit
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clRed
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haRight
          CharType = gtNumeric
          TitleString = '贷方金额'
          ColumnWidth = 0
        end>
      ColWidths = (
        28
        129
        178
        31
        29
        114
        118
        115)
    end
    object fpSum: TPanel
      Left = 1
      Top = 247
      Width = 768
      Height = 33
      Align = alBottom
      BevelOuter = bvNone
      Caption = ' '
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 1
      object Bevel4: TBevel
        Left = 501
        Top = 5
        Width = 60
        Height = 21
        Anchors = [akRight, akBottom]
      end
      object Bevel2: TBevel
        Left = 229
        Top = 5
        Width = 60
        Height = 21
        Anchors = [akRight, akBottom]
      end
      object Label1: TLabel
        Left = 233
        Top = 10
        Width = 48
        Height = 12
        Anchors = [akRight, akBottom]
        Caption = '借方金额'
      end
      object Label21: TLabel
        Left = 504
        Top = 10
        Width = 48
        Height = 12
        Anchors = [akRight, akBottom]
        Caption = '贷方金额'
      end
      object Bevel3: TBevel
        Left = 293
        Top = 5
        Width = 196
        Height = 21
        Anchors = [akRight, akBottom]
      end
      object Label22: TLabel
        Left = 98
        Top = 10
        Width = 33
        Height = 12
        Caption = '合计:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object sePzdJfhj: TLabel
        Left = 298
        Top = 9
        Width = 186
        Height = 14
        Alignment = taRightJustify
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'sePzdJfhj'
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Bevel5: TBevel
        Left = 565
        Top = 5
        Width = 196
        Height = 21
        Anchors = [akRight, akBottom]
      end
      object sePzdDfhj: TLabel
        Left = 571
        Top = 9
        Width = 185
        Height = 14
        Alignment = taRightJustify
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'sePzdDfhj'
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
  end
  object fpPzh: TFloatPanel [1]
    Left = 0
    Top = 39
    Width = 770
    Height = 59
    Align = alTop
    Color = clWhite
    Caption = 'fpPzh'
    ParentColor = False
    TabOrder = 2
    object Label2: TLabel
      Left = 25
      Top = 12
      Width = 54
      Height = 12
      Caption = '凭证类别:'
    end
    object Label3: TLabel
      Left = 25
      Top = 33
      Width = 54
      Height = 12
      Caption = '凭证编号:'
    end
    object Label4: TLabel
      Left = 286
      Top = 11
      Width = 54
      Height = 12
      Caption = '财务月份:'
    end
    object Label5: TLabel
      Left = 286
      Top = 32
      Width = 54
      Height = 12
      Caption = '凭证日期:'
    end
    object Label6: TLabel
      Left = 521
      Top = 30
      Width = 78
      Height = 12
      Caption = '附原始单据数:'
    end
    object scPzhFvct: TSDComboBox
      Left = 85
      Top = 6
      Width = 126
      Height = 20
      Style = csDropDownList
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 0
      KeyItem = cbItem2
    end
    object sePzhCode: TSDEdit
      Left = 85
      Top = 28
      Width = 126
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 1
      Text = 'sePzhCode'
      OnKeyDown = sePzhCodeKeyDown
      SplitSymbol = ' | '
    end
    object scPzhFmonth: TSDComboBox
      Left = 346
      Top = 5
      Width = 99
      Height = 20
      Style = csDropDownList
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 2
    end
    object sePzhFj: TSDEdit
      Left = 599
      Top = 27
      Width = 70
      Height = 18
      Ctl3D = False
      Enabled = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 4
      Text = 'sePzhFj'
      SplitSymbol = ' | '
    end
    object dePzhDate: TDateEdit
      Left = 346
      Top = 27