frm_r_jbtjpas.dfm

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

inherited Frm_R_Jbtj: TFrm_R_Jbtj
  Left = 154
  Top = 139
  Caption = #21152#29677#32479#35745
  ClientHeight = 455
  ClientWidth = 782
  OldCreateOrder = True
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 12
  inherited palUp: TPanel
    Width = 782
    inherited palRightUp: TPanel
      Left = 703
    end
    inherited palUpMid: TPanel
      Width = 626
      inherited imgCaption: TImage
        Width = 626
      end
    end
  end
  inherited palDown: TPanel
    Top = 446
    Width = 782
    inherited imgRightDown: TImage
      Left = 772
    end
    inherited imgDownMin: TImage
      Width = 762
    end
  end
  inherited palLeft: TPanel
    Height = 396
    inherited imgLeft: TImage
      Height = 396
    end
  end
  inherited palRight: TPanel
    Left = 772
    Height = 396
    inherited imgRight: TImage
      Height = 396
    end
  end
  inherited palClient: TPanel
    Width = 762
    Height = 396
    object Panel1: TPanel
      Left = 0
      Top = 0
      Width = 762
      Height = 307
      Align = alClient
      BevelInner = bvLowered
      Caption = 'Panel1'
      TabOrder = 0
      object DBGrid1: TDBGrid
        Left = 168
        Top = 2
        Width = 592
        Height = 303
        Align = alClient
        DataSource = Djbjl
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        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 = 'yhbh'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = []
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'yhxm'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = []
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'jbksrq'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = []
            Width = 90
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'jbkssj'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = []
            Width = 90
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'jbjzrq'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = []
            Width = 94
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'jbjzsj'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = []
            Width = 90
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'jbyy'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -12
            Title.Font.Name = #23435#20307
            Title.Font.Style = []
            Width = 204
            Visible = True
          end>
      end
      object TV: TTreeView
        Left = 2
        Top = 2
        Width = 166
        Height = 303
        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 Qrjbtj: TQuickRep
        Left = 261
        Top = 517
        Width = 794
        Height = 1123
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        DataSet = Quryjbjl
        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 QRGroup2: TQRGroup
          Left = 38
          Top = 145
          Width = 718
          Height = 21
          Frame.Color = clBlack
          Frame.DrawTop = True
          Frame.DrawBottom = True
          Frame.DrawLeft = False
          Frame.DrawRight = False
          AlignToBottom = False
          Color = clWhite
          ForceNewColumn = False
          ForceNewPage = False
          Size.Values = (
            55.5625
            1899.70833333333)
          Expression = 'Quryjbjl.bmbh'
          FooterBand = QRBand3
          Master = Qrjbtj
          ReprintOnNewPage = False
          object QRExpr1: TQRExpr
            Left = 13
            Top = 3
            Width = 105
            Height = 16
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            Size.Values = (
              42.3333333333333
              34.3958333333333
              7.9375
              277.8125)
            Alignment = taLeftJustify
            AlignToBand = False
            AutoSize = True
            AutoStretch = False
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -15
            Font.Name = #23435#20307
            Font.Style = []
            Color = clWhite
            ParentFont = False
            ResetAfterPrint = False
            Transparent = False
            WordWrap = True
            Expression = 'Quryjbjl.bmmc'
            FontSize = 11
          end
        end
        object QRBand2: TQRBand
          Left = 38
          Top = 166
          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
            1899.70833333333)
          BandType = rbDetail
          object QRDBText2: TQRDBText
            Left = 11
            Top = 1
            Width = 70
            Height = 13
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            Size.Values = (
              34.3958333333333
              29.1041666666667
              2.64583333333333
              185.208333333333)
            Alignment = taLeftJustify
            AlignToBand = False
            AutoSize = False
            AutoStretch = False
            Color = clWhite
            DataSet = Quryjbjl
            DataField = 'yhbh'
            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 QRDBText3: TQRDBText
            Left = 91
            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
              240.770833333333
              2.64583333333333
              190.5)
            Alignment = taLeftJustify
            AlignToBand = False
            AutoSize = False
            AutoStretch = False
            Color = clWhite
            DataSet = Quryjbjl