u_print.dfm

一个简单的学籍管理软件

object Fm_Print: TFm_Print
  Left = 190
  Top = 103
  AutoScroll = False
  BiDiMode = bdRightToLeft
  Caption = '打印'
  ClientHeight = 375
  ClientWidth = 574
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  ParentBiDiMode = False
  WindowState = wsMaximized
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 14
  object HDBGrid1: THDBGrid
    Left = 0
    Top = 48
    Width = 574
    Height = 327
    Align = alClient
    CaptionBckColor = clBtnFace
    CaptionHeight = 0
    CaptionPanelFont.Charset = GB2312_CHARSET
    CaptionPanelFont.Color = clWindowText
    CaptionPanelFont.Height = -14
    CaptionPanelFont.Name = '宋体'
    CaptionPanelFont.Style = []
    CaptionTextColor = clBlack
    CaptionUnderLine = usDouble
    LimitedCol = 0
    LimitedColor = clInfoBk
    HeightPerRow = 0
    ReturnDirection = rdNone
    RowAlternate = False
    RowAlternateColor = clWindow
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -14
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    VertAlignment = vgCenter
  end
  object PntPrev: THPrintGridPreview
    Left = 0
    Top = 48
    Width = 574
    Height = 327
    Align = alClient
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    ViewScale = 100
  end
  object Dck_Item: TDock97
    Left = 0
    Top = 0
    Width = 574
    Height = 48
    AllowDrag = False
    object TbBtn_Prev: TToolbar97
      Left = 0
      Top = 0
      Caption = 'TbBtn_Prev'
      DockPos = 0
      TabOrder = 0
      object TbBtn_Param02: TToolbarButton97
        Left = 0
        Top = 0
        Width = 45
        Height = 44
        Hint = '打印参数'
        Caption = '参数'
        ImageIndex = 29
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_Param01Click
      end
      object TbBtn_ZoomIn: TToolbarButton97
        Left = 141
        Top = 0
        Width = 45
        Height = 44
        Hint = '放大'
        Caption = '放大'
        ImageIndex = 45
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_ZoomInClick
      end
      object TbBtn_ZoomOut: TToolbarButton97
        Left = 186
        Top = 0
        Width = 45
        Height = 44
        Hint = '缩小'
        Caption = '缩小'
        ImageIndex = 46
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_ZoomOutClick
      end
      object TbBtn_ClosePreview: TToolbarButton97
        Left = 333
        Top = 0
        Width = 45
        Height = 44
        Hint = '关闭模拟显示返回'
        Caption = '返回'
        ImageIndex = 4
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_ClosePreviewClick
      end
      object TbBtn_Print02: TToolbarButton97
        Left = 282
        Top = 0
        Width = 45
        Height = 44
        Hint = '打印'
        Caption = '打印'
        ImageIndex = 6
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_Print01Click
      end
      object TbBtn_Space04: TToolbarSep97
        Left = 135
        Top = 0
      end
      object TbBtn_Space05: TToolbarSep97
        Left = 276
        Top = 0
        Visible = False
      end
      object TbBtn_Space06: TToolbarSep97
        Left = 327
        Top = 0
      end
      object TbBtn_NextPage: TToolbarButton97
        Left = 90
        Top = 0
        Width = 45
        Height = 44
        Hint = '下一页'
        Caption = '下一页'
        ImageIndex = 39
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_NextPageClick
      end
      object TbBtn_PrevPage: TToolbarButton97
        Left = 45
        Top = 0
        Width = 45
        Height = 44
        Hint = '上一页'
        Caption = '上一页'
        ImageIndex = 40
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_PrevPageClick
      end
      object TbBtn_NoZoom: TToolbarButton97
        Left = 231
        Top = 0
        Width = 45
        Height = 44
        Hint = '正常大小'
        Caption = '正常'
        ImageIndex = 47
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = TbBtn_NoZoomClick
      end
    end
  end
  object PntTitleGrid: THPrintTitleGrid
    Tag = 0
    CurPageNo = 1
    RowHeight = 6
    UdfRowCount = 35
    GroupLine = True
    HorzPageType = 1
    PrintTitleInfo = False
    PaperType = 3
    PageWidth = 2100
    PageHeight = 2970
    PaperDirect = 0
    SpaceTop = 10
    SpaceBottom = 10
    SpaceLeft = 10
    SpaceRight = 10
    TitleHeight = 10
    HeadRows = 3
    HeadInfoRows = 2
    HeadInfoPtr = <
      item
        InfoStr = '第(&页号)页  共(&页数)页'
        LineNo = 1
        Place = 0
      end>
    FootInfoRows = 2
    FootInfoPtr = <>
    HLineSize = POINT015
    VLineSize = POINT015
    BLineSize = POINT150
    GLineSize = POINT150
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -24
    TitleFont.Name = '楷体_GB2312'
    TitleFont.Style = [fsBold]
    InfoFont.Charset = ANSI_CHARSET
    InfoFont.Color = clWindowText
    InfoFont.Height = -14
    InfoFont.Name = '宋体'
    InfoFont.Style = []
    HeadFont.Charset = ANSI_CHARSET
    HeadFont.Color = clWindowText
    HeadFont.Height = -14
    HeadFont.Name = '宋体'
    HeadFont.Style = []
    GridFont.Charset = ANSI_CHARSET
    GridFont.Color = clWindowText
    GridFont.Height = -14
    GridFont.Name = '宋体'
    GridFont.Style = []
    Left = 479
    Top = 7
  end
  object PntDBGrid: THPrintDBGrid
    Tag = 0
    CurPageNo = 1
    RowHeight = 6
    UdfRowCount = 35
    GroupLine = True
    HorzPageType = 1
    PrintTitleInfo = False
    PaperType = 3
    PageWidth = 2100
    PageHeight = 2970
    PaperDirect = 0
    SpaceTop = 10
    SpaceBottom = 10
    SpaceLeft = 10
    SpaceRight = 10
    TitleHeight = 10
    HeadRows = 3
    HeadInfoRows = 2
    HeadInfoPtr = <
      item
        InfoStr = '第(&页号)页  共(&页数)页'
        LineNo = 2
        Place = 0
      end>
    FootInfoRows = 2
    FootInfoPtr = <>
    HLineSize = POINT015
    VLineSize = POINT015
    BLineSize = POINT150
    GLineSize = POINT150
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -24
    TitleFont.Name = '楷体_GB2312'
    TitleFont.Style = [fsBold]
    InfoFont.Charset = ANSI_CHARSET
    InfoFont.Color = clWindowText
    InfoFont.Height = -14
    InfoFont.Name = '宋体'
    InfoFont.Style = []
    HeadFont.Charset = ANSI_CHARSET
    HeadFont.Color = clWindowText
    HeadFont.Height = -14
    HeadFont.Name = '宋体'
    HeadFont.Style = []
    GridFont.Charset = ANSI_CHARSET
    GridFont.Color = clWindowText
    GridFont.Height = -14
    GridFont.Name = '宋体'
    GridFont.Style = []
    Left = 425
    Top = 8
  end
  object PntEdTitleGrid: THPrintEdTitleGrid
    Tag = 0
    CurPageNo = 1
    RowHeight = 6
    UdfRowCount = 35
    HorzPageType = 1
    PaperType = 0
    PageWidth = 0
    PageHeight = 0
    PaperDirect = 0
    HeadRows = 3
    HeadInfoRows = 2
    HeadInfoPtr = <>
    FootInfoPtr = <>
    HLineSize = POINT015
    VLineSize = POINT015
    BLineSize = POINT015
    GLineSize = POINT015
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    InfoFont.Charset = DEFAULT_CHARSET
    InfoFont.Color = clWindowText
    InfoFont.Height = -11
    InfoFont.Name = 'MS Sans Serif'
    InfoFont.Style = []
    HeadFont.Charset = DEFAULT_CHARSET
    HeadFont.Color = clWindowText
    HeadFont.Height = -11
    HeadFont.Name = 'MS Sans Serif'
    HeadFont.Style = []
    GridFont.Charset = DEFAULT_CHARSET
    GridFont.Color = clWindowText
    GridFont.Height = -11
    GridFont.Name = 'MS Sans Serif'
    GridFont.Style = []
    Left = 419
    Top = 58
  end
end