frm_r_qjtjpas.dfm

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

inherited Frm_R_Qjtj: TFrm_R_Qjtj
  Left = 133
  Top = 141
  Caption = #35831#20551#32479#35745
  ClientHeight = 462
  ClientWidth = 764
  OldCreateOrder = True
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 12
  inherited palUp: TPanel
    Width = 764
    inherited palRightUp: TPanel
      Left = 685
    end
    inherited palUpMid: TPanel
      Width = 608
      inherited imgCaption: TImage
        Width = 608
      end
    end
  end
  inherited palDown: TPanel
    Top = 453
    Width = 764
    inherited imgRightDown: TImage
      Left = 754
    end
    inherited imgDownMin: TImage
      Width = 744
    end
  end
  inherited palLeft: TPanel
    Height = 403
    inherited imgLeft: TImage
      Height = 403
    end
  end
  inherited palRight: TPanel
    Left = 754
    Height = 403
    inherited imgRight: TImage
      Height = 403
    end
  end
  inherited palClient: TPanel
    Width = 744
    Height = 403
    object Panel1: TPanel
      Left = 0
      Top = 0
      Width = 744
      Height = 317
      Align = alClient
      BevelInner = bvLowered
      Caption = 'Panel1'
      TabOrder = 0
      object TV: TTreeView
        Left = 2
        Top = 2
        Width = 174
        Height = 313
        Align = alLeft
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        Indent = 19
        ParentFont = False
        TabOrder = 1
        OnClick = TVClick
      end
      object DBGrid1: TDBGrid
        Left = 176
        Top = 2
        Width = 566
        Height = 313
        Align = alClient
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -14
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'yhxm'
            Title.Alignment = taCenter
            Title.Caption = #22995#21517
            Width = 116
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ksrq'
            Title.Alignment = taCenter
            Title.Caption = #24320#22987#26085#26399
            Width = 126
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'jsrq'
            Title.Alignment = taCenter
            Title.Caption = #32467#26463#26085#26399
            Width = 116
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'sjlb'
            Title.Alignment = taCenter
            Title.Caption = #26102#38388#31867#21035
            Width = 78
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'qqmc'
            Title.Alignment = taCenter
            Title.Caption = #35831#20551#21517#31216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ts'
            Title.Caption = #22825#25968
            Width = 40
            Visible = True
          end>
      end
      object Qrqjtj: TQuickRep
        Left = 222
        Top = 536
        Width = 794
        Height = 1123
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        DataSet = qryqqjl
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        Functions.Strings = (
          'PAGENUMBER'
          'COLUMNNUMBER'
          'REPORTTITLE')
        Functions.DATA = (
          '0'
          '0'
          #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 QRBand2: TQRBand
          Left = 38
          Top = 145
          Width = 718
          Height = 18
          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 = (
            47.625
            1899.70833333333)
          BandType = rbDetail
          object QRDBText3: TQRDBText
            Left = 14
            Top = 1
            Width = 72
            Height = 13
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            Size.Values = (
              34.3958333333333
              37.0416666666667
              2.64583333333333
              190.5)
            Alignment = taCenter
            AlignToBand = False
            AutoSize = False
            AutoStretch = False
            Color = clWhite
            DataSet = qryqqjl
            DataField = 'yhxm'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            Transparent = False
            WordWrap = True
            FontSize = 9
          end
          object QRShape14: TQRShape
            Left = 0
            Top = 16
            Width = 719
            Height = 1
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            Size.Values = (
              2.64583333333333
              0
              42.3333333333333
              1902.35416666667)
            Shape = qrsHorLine
          end
          object QRDBText1: TQRDBText
            Left = 89
            Top = 1
            Width = 72
            Height = 13
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            Size.Values = (
              34.3958333333333
              235.479166666667
              2.64583333333333
              190.5)
            Alignment = taCenter
            AlignToBand = False
            AutoSize = False
            AutoStretch = False
            Color = clWhite
            DataSet = qryqqjl
            DataField = 'bmmc'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            Transparent = False
            WordWrap = True
            FontSize = 9
          end
          object QRDBText2: TQRDBText
            Left = 198
            Top = 1
            Width = 72
            Height = 13
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            Size.Values = (
              34.3958333333333
              523.875
              2.64583333333333
              190.5)
            Alignment = taCenter
            AlignToBand = False
            AutoSize = False
            AutoStretch = False
            Color = clWhite
            DataSet = qryqqjl
            DataField = 'ksrq'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            Transparent = False
            WordWrap = True
            FontSize = 9
          end
          object QRDBText4: TQRDBText
            Left = 288
            Top = 1
            Width = 72
            Height = 13
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            Size.Values = (
              34.3958333333333
              762
              2.64583333333333
              190.5)