sy_flmxzcx.dfm

省级集邮品管理ERP

inherited frmY_FLMXZCX: TfrmY_FLMXZCX
  Left = 12
  Top = 6
  Caption = '集邮票明细分类帐——集邮票业务'
  ClientHeight = 523
  ClientWidth = 742
  OldCreateOrder = True
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 12
  inherited DBG_Result: TDBGrid [0]
    Width = 742
    Height = 398
    Columns = <
      item
        Expanded = False
        FieldName = 'FSRQ'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '日期'
        Width = 33
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DWDM'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '局号'
        Width = 51
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CRKDH'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '单号'
        Width = 125
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ZY'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '摘要'
        Width = 84
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ZJSL'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '增加数量'
        Width = 65
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJZJJE'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '增加金额'
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JSSL'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '减少数量'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJJSJE'
        PickList.Strings = ()
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '减少金额'
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JCSL'
        PickList.Strings = ()
        Title.Alignment = taCenter
        Title.Caption = '结存数量'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJYE'
        PickList.Strings = ()
        Title.Alignment = taCenter
        Title.Caption = '结存金额'
        Width = 67
        Visible = True
      end>
  end
  inherited Panel11: TPanel [1]
    Width = 742
    inherited panel1: TRxLabel
      Width = 740
      Caption = '集邮票明细分类帐'
    end
    inherited DWMC: TLabel
      Top = 24
    end
    object Label1: TLabel
      Left = 622
      Top = 22
      Width = 36
      Height = 12
      Caption = '年份：'
    end
    object SED_Year: TSpinEdit
      Left = 663
      Top = 18
      Width = 57
      Height = 21
      MaxValue = 2050
      MinValue = 1990
      TabOrder = 0
      Value = 1990
      OnChange = SED_YearChange
    end
  end
  inherited Panel3: TPanel [2]
    Top = 488
    Width = 742
    inherited BBt_Quit: TBitBtn
      Left = 646
    end
    inherited BBt_Find: TBitBtn
      Left = 456
    end
    inherited BBt_Print: TBitBtn
      Left = 553
    end
  end
  inherited Pnl_Condition: TPanel [3]
    Width = 742
    inherited l1: TLabel
      Left = 518
      Top = 17
    end
    inherited l2: TLabel
      Left = 653
      Top = 17
    end
    object Label5: TLabel [2]
      Left = 11
      Top = 17
      Width = 36
      Height = 12
      Caption = '票品：'
    end
    inherited cmb_From: TComboBox
      Left = 594
      Top = 13
      TabOrder = 1
    end
    inherited cmb_End: TComboBox
      Left = 671
      Top = 13
      TabOrder = 0
    end
    object RGr_Base: TRadioGroup
      Left = 396
      Top = 7
      Width = 113
      Height = 31
      Caption = '核算基准'
      Columns = 2
      Items.Strings = (
        '销价'
        '进价')
      TabOrder = 2
      OnClick = RGr_BaseClick
    end
    object PPSel_pp: TYzppSelect
      Left = 48
      Top = 12
      Width = 233
      Height = 20
      TabOrder = 3
      DatabaseName = 'yzpp'
      PPLX = lx_custom
      SQL.Strings = (
        
          'SELECT a.Tdm, a.zh, a.TJC, b.mc FROM TB_YZPPTXXB a, TG_YZPPTZDM ' +
          'b  '
        ' where substr(a.TDM, 10, 2) = b.TZDM(+)  order by zh')
      Title_Str = '进价'
      DropDownCount = 8
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      Color = clWindow
      ShowHint = False
      ReadOnly = False
    end
    object CB_lkc: TCheckBox
      Left = 288
      Top = 16
      Width = 97
      Height = 17
      Caption = '显示0库存票品'
      TabOrder = 4
      OnClick = CB_lkcClick
    end
  end
  object QRe_jypflmxz: TQuickRep [4]
    Left = -674
    Top = 137
    Width = 1123
    Height = 794
    Frame.Color = clBlack
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    BeforePrint = QRe_jypflmxzBeforePrint
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    Functions.Strings = (
      'PAGENUMBER'
      'COLUMNNUMBER'
      'REPORTTITLE')
    Functions.DATA = (
      '0'
      '0'
      #39#39)
    OnNeedData = QRe_jypflmxzNeedData
    OnStartPage = QRe_jypflmxzStartPage
    Options = [FirstPageHeader, LastPageFooter]
    Page.Columns = 1
    Page.Orientation = poLandscape
    Page.PaperSize = A4
    Page.Values = (
      100
      2100
      100
      2970
      150
      100
      0)
    PrinterSettings.Copies = 1
    PrinterSettings.Duplex = False
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.OutputBin = Auto
    PrintIfEmpty = True
    SnapToGrid = True
    Units = MM
    Zoom = 100
    object PageHeaderBand1: TQRBand
      Left = 57
      Top = 38
      Width = 1029
      Height = 227
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        600.604166666667
        2722.5625)
      BandType = rbPageHeader
      object QRLabel7: TQRLabel
        Left = 408
        Top = 12
        Width = 200
        Height = 22
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          58.2083333333333
          1079.5
          31.75
          529.166666666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '集邮票品分类明细帐'
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = '黑体'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 16
      end
      object QRShape12: TQRShape
        Left = 0
        Top = 151
        Width = 1029
        Height = 1
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          2.64583333333333
          0
          399.520833333333
          2722.5625)
        Brush.Color = clBlack
        Pen.Mode = pmBlack
        Shape = qrsRectangle
      end
      object QRShape15: TQRShape
        Left = 509
        Top = 155
        Width = 1
        Height = 49
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          129.645833333333
          1346.72916666667
          410.104166666667
          2.64583333333333)
        Shape = qrsVertLine
      end
      object QRShape19: TQRShape
        Left = 0
        Top = 177
        Width = 311
        Height = 3
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          7.9375
          0
          468.3125
          822.854166666667)
        Shape = qrsHorLine
      end
      object QRShape20: TQRShape
        Left = 51
        Top = 155
        Width = 1
        Height = 49
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          130.527777777778
          134.055555555556
          409.222222222222
          3.52777777777778)
        Shape = qrsVertLine
      end
      object QRShape21: TQRShape
        Left = 311
        Top = 155
        Width = 1
        Height = 49
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          129.645833333333
          822.854166666667
          410.104166666667
          2.64583333333333)
        Shape = qrsVertLine
      end
      object QRShape22: TQRShape
        Left = 114
        Top = 179
        Width = 1
        Height = 25
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          66.1458333333333
          301.625
          473.604166666667
          2.64583333333333)
        Shape = qrsVertLine
      end
      object QRLabel13: TQRLabel
        Left = 34
        Top = 160
        Width = 16
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          89.9583333333333
          423.333333333333
          42.3333333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '年'
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 11
      end
      object QRShape23: TQRShape
        Left = 510
        Top = 177
        Width = 518
        Height = 3
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          7.9375
          1349.375
          468.3125
          1370.54166666667)
        Shape = qrsHorLine
      end
      object QRShape24: TQRShape
        Left = 668
        Top = 153
        Width = 1
        Height = 51
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          134.9375
          1767.41666666667
          404.8125
          2.64583333333333)
        Brush.Color = clBlack
        Pen.Mode = pmBlack
        Shape = qrsVertLine
      end
      object QRShape25: TQRShape
        Left = 823
        Top = 153
        Width = 1
        Height = 51
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          134.9375
          2177.52083333333
          404.8125
          2.64583333333333)
        Shape = qrsVertLine
      end