frm_r_dkcxpas.dfm

来自「是一个用delphi设计的考勤系统」· DFM 代码 · 共 1,775 行 · 第 1/5 页

inherited Frm_R_Dkcx: TFrm_R_Dkcx
  Left = -20
  Top = 45
  Caption = #21047#21345#35760#24405#26597#35810
  ClientHeight = 463
  ClientWidth = 753
  OldCreateOrder = True
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 12
  inherited palUp: TPanel
    Width = 753
    inherited palRightUp: TPanel
      Left = 674
    end
    inherited palUpMid: TPanel
      Width = 597
      inherited imgCaption: TImage
        Width = 597
      end
    end
  end
  inherited palDown: TPanel
    Top = 454
    Width = 753
    inherited imgRightDown: TImage
      Left = 743
    end
    inherited imgDownMin: TImage
      Width = 733
    end
  end
  inherited palLeft: TPanel
    Height = 404
    inherited imgLeft: TImage
      Height = 404
    end
  end
  inherited palRight: TPanel
    Left = 743
    Height = 404
    inherited imgRight: TImage
      Height = 404
    end
  end
  inherited palClient: TPanel
    Width = 733
    Height = 404
    object Panel1: TPanel
      Left = 0
      Top = 0
      Width = 733
      Height = 404
      Align = alClient
      BevelInner = bvLowered
      TabOrder = 0
      object TV: TTreeView
        Left = 2
        Top = 2
        Width = 181
        Height = 264
        Align = alLeft
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        Indent = 19
        ParentFont = False
        TabOrder = 0
        OnClick = TVClick
      end
      object PageControl1: TPageControl
        Left = 183
        Top = 2
        Width = 548
        Height = 264
        ActivePage = TabSheet1
        Align = alClient
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabIndex = 0
        TabOrder = 1
        object TabSheet1: TTabSheet
          Caption = #24403#26376#21047#21345#26126#32454
          object DBGrid2: TDBGrid
            Left = 0
            Top = 0
            Width = 540
            Height = 237
            Align = alClient
            DataSource = DsCurMonth
            TabOrder = 1
            TitleFont.Charset = GB2312_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -12
            TitleFont.Name = #23435#20307
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'yhbh'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'yhxm'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'jlrq'
                Width = 101
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'jlsj'
                Width = 84
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'bmmc'
                Width = 170
                Visible = True
              end>
          end
          object QrPreMonth: TQuickRep
            Left = 454
            Top = 442
            Width = 794
            Height = 1123
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            DataSet = qrykqjl
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = []
            Functions.Strings = (
              'PAGENUMBER'
              'COLUMNNUMBER'
              'REPORTTITLE'
              'QRSTRINGSBAND1')
            Functions.DATA = (
              '0'
              '0'
              #39#39
              #39#39)
            Options = [FirstPageHeader, LastPageFooter]
            Page.Columns = 1
            Page.Orientation = poPortrait
            Page.PaperSize = A4
            Page.Values = (
              300
              2970
              100
              2100
              100
              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 QRBand7: TQRBand
              Left = 38
              Top = 121
              Width = 718
              Height = 24
              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 = (
                63.5
                1899.70833333333)
              BandType = rbColumnHeader
              object QRLabel9: TQRLabel
                Left = 11
                Top = 3
                Width = 46
                Height = 17
                Frame.Color = clBlack
                Frame.DrawTop = False
                Frame.DrawBottom = False
                Frame.DrawLeft = False
                Frame.DrawRight = False
                Size.Values = (
                  44.9791666666667
                  29.1041666666667
                  7.9375
                  121.708333333333)
                Alignment = taLeftJustify
                AlignToBand = False
                AutoSize = True
                AutoStretch = False
                Caption = #35774#22791#21495
                Color = clWhite
                Font.Charset = GB2312_CHARSET
                Font.Color = clWindowText
                Font.Height = -15
                Font.Name = #23435#20307
                Font.Style = []
                ParentFont = False
                Transparent = False
                WordWrap = True
                FontSize = 11
              end
              object QRShape2: TQRShape
                Left = 0
                Top = 21
                Width = 709
                Height = 1
                Frame.Color = clBlack
                Frame.DrawTop = False
                Frame.DrawBottom = False
                Frame.DrawLeft = False
                Frame.DrawRight = False
                Size.Values = (
                  2.64583333333333
                  0
                  55.5625
                  1875.89583333333)
                Shape = qrsHorLine
              end
              object QRLabel56: TQRLabel
                Left = 97
                Top = 3
                Width = 61
                Height = 17
                Frame.Color = clBlack
                Frame.DrawTop = False
                Frame.DrawBottom = False
                Frame.DrawLeft = False
                Frame.DrawRight = False
                Size.Values = (
                  44.9791666666667
                  256.645833333333
                  7.9375
                  161.395833333333)
                Alignment = taLeftJustify
                AlignToBand = False
                AutoSize = True
                AutoStretch = False
                Caption = #29992#25143#22995#21517
                Color = clWhite
                Font.Charset = GB2312_CHARSET
                Font.Color = clWindowText
                Font.Height = -15
                Font.Name = #23435#20307
                Font.Style = []
                ParentFont = False
                Transparent = False
                WordWrap = True
                FontSize = 11
              end
              object QRLabel59: TQRLabel
                Left = 216
                Top = 3
                Width = 61
                Height = 17
                Frame.Color = clBlack
                Frame.DrawTop = False
                Frame.DrawBottom = False
                Frame.DrawLeft = False
                Frame.DrawRight = False
                Size.Values = (
                  44.9791666666667
                  571.5
                  7.9375
                  161.395833333333)
                Alignment = taLeftJustify
                AlignToBand = False
                AutoSize = True
                AutoStretch = False
                Caption = #35760#24405#26085#26399
                Color = clWhite
                Font.Charset = GB2312_CHARSET
                Font.Color = clWindowText
                Font.Height = -15
                Font.Name = #23435#20307
                Font.Style = []
                ParentFont = False
                Transparent = False
                WordWrap = True
                FontSize = 11
              end
              object QRLabel60: TQRLabel
                Left = 360
                Top = 3
                Width = 61
                Height = 17
                Frame.Color = clBlack
                Frame.DrawTop = False
                Frame.DrawBottom = False
                Frame.DrawLeft = False
                Frame.DrawRight = False
                Size.Values = (
                  44.9791666666667
                  952.5
                  7.9375
                  161.395833333333)
                Alignment = taLeftJustify
                AlignToBand = False
                AutoSize = True
                AutoStretch = False
                Caption = #35760#24405#26102#38388
                Color = clWhite
                Font.Charset = GB2312_CHARSET
                Font.Color = clWindowText
                Font.Height = -15
                Font.Name = #23435#20307
                Font.Style = []
                ParentFont = False
                Transparent = False
                WordWrap = True
                FontSize = 11
              end
            end
            object QRBand8: TQRBand
              Left = 38
              Top = 145
              Width = 718
              Height = 17
              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 = (
                44.9791666666667