mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-10-26 16:41:26 +01:00
Turbopower_iPro: In PrintPreview form, remove usage of hardcoded MS Sans Serif font.
git-svn-id: trunk@52028 -
This commit is contained in:
parent
ac512d4521
commit
c0eee1ac56
@ -6,23 +6,21 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
Caption = 'Print preview'
|
Caption = 'Print preview'
|
||||||
ClientHeight = 372
|
ClientHeight = 372
|
||||||
ClientWidth = 645
|
ClientWidth = 645
|
||||||
Font.Height = -11
|
|
||||||
Font.Name = 'MS Sans Serif'
|
|
||||||
OnCreate = FormCreate
|
OnCreate = FormCreate
|
||||||
OnDestroy = FormDestroy
|
OnDestroy = FormDestroy
|
||||||
OnResize = FormResize
|
OnResize = FormResize
|
||||||
OnShow = FormShow
|
OnShow = FormShow
|
||||||
Position = poScreenCenter
|
Position = poScreenCenter
|
||||||
LCLVersion = '0.9.29'
|
LCLVersion = '1.7'
|
||||||
object Panel1: TPanel
|
object Panel1: TPanel
|
||||||
Left = 0
|
Left = 0
|
||||||
Height = 33
|
Height = 36
|
||||||
Top = 0
|
Top = 0
|
||||||
Width = 645
|
Width = 645
|
||||||
Align = alTop
|
Align = alTop
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BevelOuter = bvNone
|
BevelOuter = bvNone
|
||||||
ClientHeight = 33
|
ClientHeight = 36
|
||||||
ClientWidth = 645
|
ClientWidth = 645
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
object Label1: TLabel
|
object Label1: TLabel
|
||||||
@ -30,9 +28,9 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 398
|
Left = 422
|
||||||
Height = 14
|
Height = 15
|
||||||
Top = 9
|
Top = 11
|
||||||
Width = 29
|
Width = 29
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = 'Page:'
|
Caption = 'Page:'
|
||||||
@ -43,10 +41,10 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 469
|
Left = 493
|
||||||
Height = 14
|
Height = 15
|
||||||
Top = 9
|
Top = 11
|
||||||
Width = 10
|
Width = 11
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = 'of'
|
Caption = 'of'
|
||||||
ParentColor = False
|
ParentColor = False
|
||||||
@ -56,9 +54,9 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 484
|
Left = 509
|
||||||
Height = 1
|
Height = 1
|
||||||
Top = 16
|
Top = 18
|
||||||
Width = 1
|
Width = 1
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
ParentColor = False
|
ParentColor = False
|
||||||
@ -68,19 +66,21 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 159
|
Left = 170
|
||||||
Height = 14
|
Height = 15
|
||||||
Top = 9
|
Top = 11
|
||||||
Width = 31
|
Width = 35
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = 'Zoom:'
|
Caption = 'Zoom:'
|
||||||
ParentColor = False
|
ParentColor = False
|
||||||
end
|
end
|
||||||
object btnPrint: TButton
|
object btnPrint: TButton
|
||||||
|
AnchorSideTop.Control = Panel1
|
||||||
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 5
|
Left = 5
|
||||||
Height = 23
|
Height = 25
|
||||||
Top = 5
|
Top = 6
|
||||||
Width = 47
|
Width = 51
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = 'Print'
|
Caption = 'Print'
|
||||||
@ -93,10 +93,10 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 318
|
Left = 336
|
||||||
Height = 23
|
Height = 25
|
||||||
Top = 5
|
Top = 6
|
||||||
Width = 38
|
Width = 42
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = '<<'
|
Caption = '<<'
|
||||||
@ -108,10 +108,10 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 361
|
Left = 383
|
||||||
Height = 23
|
Height = 25
|
||||||
Top = 5
|
Top = 6
|
||||||
Width = 32
|
Width = 34
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = '<'
|
Caption = '<'
|
||||||
@ -123,10 +123,10 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 490
|
Left = 515
|
||||||
Height = 23
|
Height = 25
|
||||||
Top = 5
|
Top = 6
|
||||||
Width = 32
|
Width = 34
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = '>'
|
Caption = '>'
|
||||||
@ -138,10 +138,10 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 527
|
Left = 554
|
||||||
Height = 23
|
Height = 25
|
||||||
Top = 5
|
Top = 6
|
||||||
Width = 38
|
Width = 42
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = '>>'
|
Caption = '>>'
|
||||||
@ -153,10 +153,10 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 261
|
Left = 276
|
||||||
Height = 23
|
Height = 25
|
||||||
Top = 5
|
Top = 6
|
||||||
Width = 52
|
Width = 55
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Cancel = True
|
Cancel = True
|
||||||
@ -169,9 +169,9 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 432
|
Left = 456
|
||||||
Height = 21
|
Height = 23
|
||||||
Top = 6
|
Top = 7
|
||||||
Width = 32
|
Width = 32
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
OnChange = edtPageChange
|
OnChange = edtPageChange
|
||||||
@ -183,12 +183,12 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 195
|
Left = 210
|
||||||
Height = 21
|
Height = 23
|
||||||
Top = 6
|
Top = 7
|
||||||
Width = 61
|
Width = 61
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
ItemHeight = 13
|
ItemHeight = 15
|
||||||
Items.Strings = (
|
Items.Strings = (
|
||||||
'10%'
|
'10%'
|
||||||
'25%'
|
'25%'
|
||||||
@ -209,10 +209,10 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = Panel1
|
AnchorSideTop.Control = Panel1
|
||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
Left = 57
|
Left = 61
|
||||||
Height = 23
|
Height = 25
|
||||||
Top = 5
|
Top = 6
|
||||||
Width = 97
|
Width = 104
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 5
|
BorderSpacing.Around = 5
|
||||||
Caption = 'Select printer...'
|
Caption = 'Select printer...'
|
||||||
@ -222,11 +222,13 @@ object IpHTMLPreview: TIpHTMLPreview
|
|||||||
end
|
end
|
||||||
object ScrollBox1: TScrollBox
|
object ScrollBox1: TScrollBox
|
||||||
Left = 0
|
Left = 0
|
||||||
Height = 339
|
Height = 336
|
||||||
Top = 33
|
Top = 36
|
||||||
Width = 645
|
Width = 645
|
||||||
|
HorzScrollBar.Page = 158
|
||||||
|
VertScrollBar.Page = 125
|
||||||
Align = alClient
|
Align = alClient
|
||||||
ClientHeight = 335
|
ClientHeight = 332
|
||||||
ClientWidth = 641
|
ClientWidth = 641
|
||||||
Color = clBtnFace
|
Color = clBtnFace
|
||||||
ParentColor = False
|
ParentColor = False
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user