📄 ydpreview.dfm
字号:
object FPreview: TFPreview
Left = 44
Top = 268
BorderStyle = bsSingle
Caption = '打印预览'
ClientHeight = 548
ClientWidth = 791
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {
0000010001002020100000000000E80200001600000028000000200000004000
0000010004000000000080020000000000000000000000000000000000000000
0000000080000080000000808000800000008000800080800000C0C0C0008080
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
00000000000000000000000000000CCCCCCCCCCCCCCCCCCCCCCCCCCCCCC00CCC
CCCCCCCCCCCCCCCCCCCCCCCCCCC00CC00000000000CCC000000000000CC00CC0
000000000CCFCC00000000000CC00CC000000000CCCFCCC0000000000CC00CC0
0000000CCCCFCCCC000000000CC00CC0000000CCCCCFCCCCC00000000CC00CC0
00000CCCCCCFCCCCCC0000000CC00CC00000CCCCCCFFFCCCCCC000000CC00CC0
000CCCCCCCFFFCCCCCCC00000CC00CC000CCCCCCCCFFFCCCCCCCC0000CC00CC0
0CCCCCCCCFFFFFCCCCCCCC000CC00CC0CCCCCCCCCFFFFFCCCCCCCCC00CC00CCC
CCCCCCFFFFFFFFFFFCCCCCCCCCC00CCCCCCFFFFFFFFFFFFFFFFFCCCCCCC00CCC
CCCCCCFFFFFFFFFFFCCCCCCCCCC00CC00CCCCCCCCFFFFFCCCCCCCCCC0CC00CC0
00CCCCCCCFFFFFCCCCCCCCC00CC00CC000CCCCCCCCFFFCCCCCCCCC000CC00CC0
000CCCCCCCFFFCCCCCCCC0000CC00CC00000CCCCCCFFFCCCCCCC00000CC00CC0
00000CCCCCCFCCCCCCC000000CC00CC0000000CCCCCFCCCCCC0000000CC00CC0
0000000CCCCFCCCCC00000000CC00CC00000000CCCCFCCCC000000000CC00CC0
00000000CCCFCCC0000000000CC00CC0000000000CCFCC00000000000CC00CC0
0000000000CCC000000000000CC00CCCCCCCCCCCCCCCCCCCCCCCCCCCCCC00CCC
CCCCCCCCCCCCCCCCCCCCCCCCCCC000000000000000000000000000000000FFFF
FFFF80000001800000019FFC7FF99FF83FF99FF01FF99FE00FF99FC007F99F80
03F99F0001F99E0000F99C000079980000399000001980000001800000018000
0001980000099C0000199C0000399E0000799F0000F99F8001F99FC003F99FE0
07F99FE00FF99FF01FF99FF83FF99FFC7FF98000000180000001FFFFFFFF}
OldCreateOrder = False
Position = poDefault
WindowState = wsMaximized
OnActivate = FormActivate
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object QRPreview1: TQRPreview
Left = 1
Top = 40
Width = 789
Height = 487
Cursor = crArrow
HorzScrollBar.Tracking = True
VertScrollBar.Tracking = True
TabOrder = 0
OnProgressUpdate = QRPreview1ProgressUpdate
PageNumber = 1
Zoom = 100
end
object Panel1: TPanel
Left = -5
Top = 526
Width = 806
Height = 25
TabOrder = 1
object ProgressBar1: TProgressBar
Left = 254
Top = 3
Width = 259
Height = 19
Min = 0
Max = 100
TabOrder = 0
end
end
object Panel3: TPanel
Left = 1
Top = 1
Width = 789
Height = 40
BevelInner = bvLowered
BevelOuter = bvSpace
TabOrder = 2
object SpeedButton1: TSpeedButton
Left = 21
Top = 7
Width = 66
Height = 25
Caption = '打印'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0000000000
0FFFF0888888888080FF000000000000080F0888888FFF88000F088888877788
080F00000000000008800888888888808080F000000000080800FF0FFFFFFFF0
8080FFF0F00000F0000FFFF0FFFFFFFF0FFFFFFF0F00000F0FFFFFFF0FFFFFFF
F0FFFFFFF000000000FFFFFFFFFFFFFFFFFF}
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 90
Top = 7
Width = 66
Height = 25
Caption = '打印设置'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 159
Top = 7
Width = 66
Height = 25
Caption = '上一页'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 228
Top = 7
Width = 66
Height = 25
Caption = '下一页'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
OnClick = SpeedButton4Click
end
object SpeedButton6: TSpeedButton
Left = 366
Top = 7
Width = 66
Height = 25
Caption = '打开'
Enabled = False
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object SpeedButton7: TSpeedButton
Left = 544
Top = 7
Width = 66
Height = 25
Caption = '关闭(&X)'
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
ParentFont = False
OnClick = SpeedButton7Click
end
object Label1: TLabel
Left = 443
Top = 11
Width = 32
Height = 16
Caption = '比例'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object SpeedButton5: TSpeedButton
Left = 297
Top = 7
Width = 66
Height = 25
Caption = '保存'
Enabled = False
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
OnClick = SpeedButton5Click
end
object ComboBox1: TComboBox
Left = 478
Top = 7
Width = 53
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ItemHeight = 16
ParentFont = False
TabOrder = 0
Text = '100'
OnChange = ComboBox1Change
Items.Strings = (
'10'
'20'
'30'
'40'
'50'
'60'
'70'
'80'
'90'
'100'
'110'
'120'
'130'
'140'
'150'
'200'
'250'
'300'
'350'
'400'
'')
end
object Panel2: TPanel
Left = 631
Top = 9
Width = 143
Height = 23
BevelOuter = bvLowered
Caption = 'Panel2'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 1
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -