📄 qm_prvfrm.dfm
字号:
object QMPreviewForm: TQMPreviewForm
Left = 181
Top = 97
Width = 604
Height = 407
BorderIcons = [biSystemMenu, biMaximize]
Caption = 'Preview Form'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {
0000010001001010100000000000280100001600000028000000100000002000
00000100040000000000C0000000000000000000000000000000000000000000
0000000080000080000000808000800000008000800080800000C0C0C0008080
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
00000000000000000000000000000FFFFFFFFFF000000FFFFFFF000080000FFF
FFF0877808000FFFFF0877E880000FFFFF07777870000FFFFF07E77870000FFF
FF08EE7880000FFFFFF0877800000FFFFFFF000000000FFFFFFFFFF000000FFF
FFFF000000000FFFFFFF070000000FFFFFFF000000000000000000000000FFFF
0000000C00000008000000010000000300000003000000030000000300000003
000000070000000F0000000F0000000F0000001F0000003F0000007F0000}
OldCreateOrder = False
Position = poScreenCenter
Scaled = False
OnClose = FormClose
OnCreate = FormCreate
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 12
object Panel2: TPanel
Left = 0
Top = 26
Width = 596
Height = 335
Align = alClient
BevelOuter = bvNone
BorderStyle = bsSingle
Color = clGray
TabOrder = 3
end
object QPreview: TQRPreview
Left = 0
Top = 26
Width = 596
Height = 335
HorzScrollBar.Tracking = True
VertScrollBar.Tracking = True
Align = alClient
Color = clGray
ParentColor = False
PopupMenu = PopupMenu1
TabOrder = 1
OnMouseDown = QPreviewMouseDown
OnPageAvailable = QPreviewPageAvailable
OnProgressUpdate = QPreviewProgressUpdate
PageNumber = 1
Zoom = 100
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 596
Height = 26
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object spProcess: TShape
Left = 600
Top = 11
Width = 150
Height = 15
Brush.Color = clNavy
Pen.Color = clNavy
end
object lblPercent: TLabel
Left = 600
Top = 14
Width = 150
Height = 12
Alignment = taCenter
AutoSize = False
Caption = '0%'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clYellow
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
end
object btnZoom: TButton
Left = 296
Top = 2
Width = 64
Height = 22
Caption = '&Zoom'
Enabled = False
TabOrder = 2
OnClick = btnZoomClick
end
object btnSet: TButton
Left = 366
Top = 2
Width = 74
Height = 22
Caption = '&Setup...'
Enabled = False
TabOrder = 3
OnClick = btnSetClick
end
object btnPrint: TButton
Left = 446
Top = 2
Width = 74
Height = 22
Caption = '&Print...'
Enabled = False
TabOrder = 4
OnClick = btnPrintClick
end
object btnExit: TButton
Left = 526
Top = 2
Width = 64
Height = 22
Cancel = True
Caption = 'E&xit'
ModalResult = 2
TabOrder = 5
end
object btnNext: TButton
Left = 156
Top = 2
Width = 64
Height = 22
Caption = '&Next'
Enabled = False
TabOrder = 1
OnClick = btnNextClick
end
object btnPrior: TButton
Left = 86
Top = 2
Width = 64
Height = 22
Caption = 'P&rior'
Enabled = False
TabOrder = 0
OnClick = btnPriorClick
end
object btnOutput: TButton
Left = 6
Top = 2
Width = 74
Height = 22
Caption = '&Output...'
Enabled = False
TabOrder = 6
OnClick = btnOutputClick
end
object btnGo: TButton
Left = 226
Top = 2
Width = 64
Height = 22
Caption = '&Go'
Enabled = False
TabOrder = 7
OnClick = btnGoClick
end
end
object StatusBar: TStatusBar
Left = 0
Top = 361
Width = 596
Height = 19
Panels = <
item
Width = 152
end
item
Alignment = taCenter
Width = 110
end
item
Alignment = taCenter
Width = 110
end
item
Width = 50
end>
SimplePanel = False
end
object PopupMenu1: TPopupMenu
Left = 8
Top = 31
object mni500: TMenuItem
Tag = 500
Caption = '500%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mni200: TMenuItem
Tag = 200
Caption = '200%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mni150: TMenuItem
Tag = 150
Caption = '150%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mni100: TMenuItem
Tag = 100
Caption = '100%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mni75: TMenuItem
Tag = 75
Caption = '75%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mni50: TMenuItem
Tag = 50
Caption = '50%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mni25: TMenuItem
Tag = 25
Caption = '25%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mni10: TMenuItem
Tag = 10
Caption = '10%'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mniWidth: TMenuItem
Tag = 1
Caption = 'Width'
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
object mniFull: TMenuItem
Caption = 'Full'
Checked = True
GroupIndex = 1
RadioItem = True
OnClick = mniScaleClick
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -