1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
object MainForm: TMainForm
Left = 315
Height = 327
Top = 177
Width = 569
HorzScrollBar.Page = 568
VertScrollBar.Page = 326
ActiveControl = OpenHTMLFileButton1
Caption = 'Example for turbopower internet pro HTML control'
ClientHeight = 327
ClientWidth = 569
OnCreate = MainFormCreate
LCLVersion = '0.9.29'
object IpHtmlPanel1: TIpHtmlPanel
Left = 0
Height = 285
Top = 42
Width = 569
Align = alClient
FixedTypeface = 'Courier New'
DefaultTypeFace = 'default'
DefaultFontSize = 12
FlagErrors = False
PrintSettings.MarginLeft = 0.5
PrintSettings.MarginTop = 0.5
PrintSettings.MarginRight = 0.5
PrintSettings.MarginBottom = 0.5
TabOrder = 1
OnHotClick = IpHtmlPanel1HotClick
end
object Panel1: TPanel
Left = 0
Height = 42
Top = 0
Width = 569
Align = alTop
ClientHeight = 42
ClientWidth = 569
TabOrder = 0
object OpenHTMLFileButton1: TButton
Left = 16
Height = 26
Top = 8
Width = 152
BorderSpacing.InnerBorder = 4
Caption = 'Open HTML File'
OnClick = OpenHTMLFileButtonClick
TabOrder = 0
end
object Button1: TButton
Left = 192
Height = 25
Top = 8
Width = 75
BorderSpacing.InnerBorder = 4
Caption = 'Preview'
OnClick = Button1Click
TabOrder = 1
end
end
object OpenDialog1: TOpenDialog
Filter = 'Web Pages|*.html;*.htm'
FilterIndex = 0
left = 24
top = 120
end
end
|
