prvdlg.dfm

来自「delphi框架可以学习, 写的很好的」· DFM 代码 · 共 776 行 · 第 1/3 页

DFM
776
字号
object frmPrvDlg: TfrmPrvDlg
  Left = 237
  Top = 95
  ActiveControl = ppViewer1
  AutoScroll = False
  Caption = #39044#35272
  ClientHeight = 551
  ClientWidth = 800
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  PrintScale = poNone
  Scaled = False
  WindowState = wsMaximized
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Label2: TLabel
    Left = 0
    Top = 85
    Width = 800
    Height = 4
    Align = alTop
    AutoSize = False
  end
  object ppViewer1: TppViewer
    Left = 0
    Top = 89
    Width = 800
    Height = 443
    Align = alClient
    BevelOuter = bvNone
    Ctl3D = False
    PageColor = clWindow
    ParentCtl3D = False
    PopupMenu = PopupMenu1
    ZoomPercentage = 75
    ZoomSetting = zsWholePage
    OnMouseDown = ppViewer1MouseDown
    OnMouseMove = ppViewer1MouseMove
    OnMouseUp = ppViewer1MouseUp
    OnPageChange = ppViewer1PageChange
    OnPrintStateChange = ppViewer1PrintStateChange
    OnStatusChange = ppViewer1StatusChange
  end
  object FStatusBar: TStatusBar
    Left = 0
    Top = 532
    Width = 800
    Height = 19
    BiDiMode = bdLeftToRight
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Pitch = fpVariable
    Font.Style = []
    Panels = <
      item
        Alignment = taCenter
        Text = '+'
        Width = 12
      end
      item
        Text = #31532'0'#39029' '#20849'0'#39029
        Width = 200
      end
      item
        Width = 50
      end>
    ParentBiDiMode = False
    ParentColor = True
    SimplePanel = False
    UseSystemFont = False
  end
  object Panel3: TRzPanel
    Left = 0
    Top = 44
    Width = 800
    Height = 41
    Align = alTop
    BorderOuter = fsFlatRounded
    BorderSides = [sdTop, sdBottom]
    TabOrder = 2
    UseGradients = True
    object Label3: TLabel
      Left = 16
      Top = 15
      Width = 48
      Height = 12
      Caption = #25918#32553#27604#20363
      Transparent = True
    end
    object Label4: TLabel
      Left = 224
      Top = 16
      Width = 24
      Height = 12
      Caption = #39029#25968
      Transparent = True
    end
    object TransButton1: TTransButton
      Tag = 1
      Left = 254
      Top = 12
      Width = 26
      Height = 20
      AnimateActive = False
      Color = clBtnFace
      GlyphIndex = 1
      Glyph.Data = {
        5A010000424D5A01000000000000760000002800000014000000130000000100
        040000000000E4000000CE0E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777700007777777777777777777700007777777777777777777700007777
        7777777777777777000077778877777778777777000077770077777780777777
        0000777700777778007777770000777700777780007777770000777700777800
        0077777700007777007780000077777700007777007778000077777700007777
        0077778000777777000077770077777800777777000077770077777780777777
        0000777788777777787777770000777777777777777777770000777777777777
        777777770000777777777777777777770000777777777777777777770000}
      Layout = blGlyphCenter
      OnClick = BtnFirstPageClick
    end
    object TransButton2: TTransButton
      Tag = 1
      Left = 280
      Top = 12
      Width = 26
      Height = 20
      AnimateActive = False
      Color = clBtnFace
      GlyphIndex = 1
      Glyph.Data = {
        5A010000424D5A01000000000000760000002800000014000000130000000100
        040000000000E4000000CE0E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777700007777777777777777777700007777777777777777777700007777
        7777777777777777000077777777777877777777000077777777778077777777
        0000777777777800777777770000777777778000777777770000777777780000
        7777777700007777778000007777777700007777777800007777777700007777
        7777800077777777000077777777780077777777000077777777778077777777
        0000777777777778777777770000777777777777777777770000777777777777
        777777770000777777777777777777770000777777777777777777770000}
      Layout = blGlyphCenter
      OnClick = BtnPriorPageClick
    end
    object TransButton3: TTransButton
      Tag = 1
      Left = 348
      Top = 12
      Width = 26
      Height = 20
      AnimateActive = False
      Color = clBtnFace
      GlyphIndex = 1
      Glyph.Data = {
        5A010000424D5A01000000000000760000002800000014000000130000000100
        040000000000E4000000CE0E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777700007777777777777777777700007777777777777777777700007777
        7777777777777777000077777778777777777777000077777770877777777777
        0000777777700877777777770000777777700087777777770000777777700008
        7777777700007777777000008777777700007777777000087777777700007777
        7770008777777777000077777770087777777777000077777770877777777777
        0000777777787777777777770000777777777777777777770000777777777777
        777777770000777777777777777777770000777777777777777777770000}
      Layout = blGlyphCenter
      OnClick = BtnNextPageClick
    end
    object TransButton4: TTransButton
      Tag = 1
      Left = 374
      Top = 12
      Width = 26
      Height = 20
      AnimateActive = False
      Color = clBtnFace
      GlyphIndex = 1
      Glyph.Data = {
        5A010000424D5A01000000000000760000002800000014000000130000000100
        040000000000E4000000CE0E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777700007777777777777777777700007777777777777777777700007777
        7777777777777777000077777877777778877777000077777087777770077777
        0000777770087777700777770000777770008777700777770000777770000877
        7007777700007777700000877007777700007777700008777007777700007777
        7000877770077777000077777008777770077777000077777087777770077777
        0000777778777777788777770000777777777777777777770000777777777777
        777777770000777777777777777777770000777777777777777777770000}
      Layout = blGlyphCenter
      OnClick = BtnLastPageClick
    end
    object cbZoomInOut: TRzComboBox
      Left = 71
      Top = 11
      Width = 122
      Height = 20
      Style = csDropDownList
      Ctl3D = False
      DropDownCount = 20
      DropDownWidth = 230
      FlatButtons = True
      FrameHotColor = 33023
      FrameHotTrack = True
      FrameVisible = True
      ItemHeight = 12
      ParentCtl3D = False
      TabOnEnter = True
      TabOrder = 0
      OnClick = ZoomPercentages
      OnKeyPress = cbZoomInOutKeyPress
      Items.Strings = (
        '200%'
        '150%'
        '100%'
        '75%'
        '50%'
        '25%'
        '10%'
        #25972#39029
        #32440#24352#22823#23567)
    end
    object edtPreviewPage: TEdit
      Tag = 1
      Left = 305
      Top = 12
      Width = 44
      Height = 20
      Color = 14478829
      TabOrder = 1
      Text = '0'
      OnKeyDown = edtPreviewPageKeyDown
    end
  end
  object RzToolbar1: TRzToolbar
    Left = 0
    Top = 0
    Width = 800
    Height = 44
    AutoStyle = False
    Images = ImageList1
    RowHeight = 40
    ButtonLayout = blGlyphTop
    ButtonWidth = 60
    ButtonHeight = 40
    ShowButtonCaptions = True
    TextOptions = ttoShowTextLabels
    BorderInner = fsNone

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?