diff --git a/components/turbopower_ipro/examples/browser.lpi b/components/turbopower_ipro/examples/browser.lpi
index 43ddb13f44..cf7f3068d7 100644
--- a/components/turbopower_ipro/examples/browser.lpi
+++ b/components/turbopower_ipro/examples/browser.lpi
@@ -11,7 +11,6 @@
-
@@ -50,9 +49,10 @@
-
+
+
diff --git a/components/turbopower_ipro/examples/htmfileexp1.lfm b/components/turbopower_ipro/examples/htmfileexp1.lfm
index 1e0ae04385..37d717448b 100644
--- a/components/turbopower_ipro/examples/htmfileexp1.lfm
+++ b/components/turbopower_ipro/examples/htmfileexp1.lfm
@@ -1,43 +1,51 @@
object FHtmFileExp1: TFHtmFileExp1
- Left = 454
- Height = 327
- Top = 373
- Width = 569
+ Left = 312
+ Height = 567
+ Top = 217
+ Width = 777
ActiveControl = B_OpenHTMLFile
Caption = 'Example 1 for turbopower: HTM File Explorer'
- ClientHeight = 327
- ClientWidth = 569
+ ClientHeight = 567
+ ClientWidth = 777
OnCreate = FormCreate
OnDestroy = FormDestroy
- LCLVersion = '0.9.25'
+ LCLVersion = '1.7'
object IpHtmlPanel1: TIpHtmlPanel
- Height = 285
+ Left = 0
+ Height = 525
Top = 42
- Width = 569
+ Width = 777
Align = alClient
FixedTypeface = 'Courier New'
DefaultTypeFace = 'default'
DefaultFontSize = 12
FactBAParag = 0.5
+ FlagErrors = False
PrintSettings.MarginLeft = 0.5
PrintSettings.MarginTop = 0.5
PrintSettings.MarginRight = 0.5
PrintSettings.MarginBottom = 0.5
+ PrintSettings.Preview.Left = 480
+ PrintSettings.Preview.Top = 270
+ PrintSettings.Preview.Width = 1440
+ PrintSettings.Preview.Height = 810
+ TabOrder = 1
OnHotClick = IpHtmlPanel1HotClick
end
object P_Top: TPanel
+ Left = 0
Height = 42
- Width = 569
+ Top = 0
+ Width = 777
Align = alTop
ClientHeight = 42
- ClientWidth = 569
+ ClientWidth = 777
TabOrder = 0
object SB_GoBackward: TSpeedButton
Left = 176
Height = 25
Top = 8
Width = 25
- Color = clBtnFace
Enabled = False
Glyph.Data = {
36060000424D3606000000000000360400002800000020000000100000000100
@@ -99,7 +107,6 @@ object FHtmFileExp1: TFHtmFileExp1
Height = 25
Top = 8
Width = 25
- Color = clBtnFace
Enabled = False
Glyph.Data = {
36060000424D3606000000000000360400002800000020000000100000000100
@@ -170,7 +177,7 @@ object FHtmFileExp1: TFHtmFileExp1
object OpenDialog1: TOpenDialog
Filter = 'Web Pages|*.html;*.htm'
FilterIndex = 0
- left = 26
- top = 93
+ left = 48
+ top = 80
end
end
diff --git a/components/turbopower_ipro/examples/htmfileexp1.pas b/components/turbopower_ipro/examples/htmfileexp1.pas
index 7c1e6b4c2d..89dbf7a3fe 100644
--- a/components/turbopower_ipro/examples/htmfileexp1.pas
+++ b/components/turbopower_ipro/examples/htmfileexp1.pas
@@ -67,6 +67,9 @@ function ProgramDirectory(BundleRoot: boolean): string;
implementation
+uses
+ LazFileUtils, LazUTF8;
+
{$R htmfileexp1.lfm}
{$R defaultimage.res}
diff --git a/components/turbopower_ipro/examples/htmfileexp2.lfm b/components/turbopower_ipro/examples/htmfileexp2.lfm
index 633412a4ed..59a43db73f 100644
--- a/components/turbopower_ipro/examples/htmfileexp2.lfm
+++ b/components/turbopower_ipro/examples/htmfileexp2.lfm
@@ -8,9 +8,11 @@ object FHtmFileExp2: TFHtmFileExp2
ClientHeight = 327
ClientWidth = 569
OnCreate = FormCreate
- LCLVersion = '0.9.25'
+ LCLVersion = '1.7'
object P_Top: TPanel
+ Left = 0
Height = 42
+ Top = 0
Width = 569
Align = alTop
ClientHeight = 42
@@ -21,7 +23,6 @@ object FHtmFileExp2: TFHtmFileExp2
Height = 25
Top = 8
Width = 25
- Color = clBtnFace
Enabled = False
Glyph.Data = {
36060000424D3606000000000000360400002800000020000000100000000100
@@ -83,7 +84,6 @@ object FHtmFileExp2: TFHtmFileExp2
Height = 25
Top = 8
Width = 25
- Color = clBtnFace
Enabled = False
Glyph.Data = {
36060000424D3606000000000000360400002800000020000000100000000100
diff --git a/components/turbopower_ipro/examples/htmfileexp2.pas b/components/turbopower_ipro/examples/htmfileexp2.pas
index a60f9c0cfb..0293601518 100644
--- a/components/turbopower_ipro/examples/htmfileexp2.pas
+++ b/components/turbopower_ipro/examples/htmfileexp2.pas
@@ -80,7 +80,7 @@ implementation
{$R defaultimage.res}
uses
- IpUtils;
+ IpUtils, LazFileUtils;
{--------------------------------------}
{-PRIVATE----------}
diff --git a/components/turbopower_ipro/examples/htmfileexplorer1.lpi b/components/turbopower_ipro/examples/htmfileexplorer1.lpi
index 5015f6301b..567d318386 100644
--- a/components/turbopower_ipro/examples/htmfileexplorer1.lpi
+++ b/components/turbopower_ipro/examples/htmfileexplorer1.lpi
@@ -1,20 +1,22 @@
-
+
+
-
-
-
+
+
+
+
@@ -53,8 +55,13 @@
-
+
+
+
+
+
+
@@ -62,8 +69,5 @@
-
-
-
diff --git a/components/turbopower_ipro/examples/htmfileexplorer2.lpi b/components/turbopower_ipro/examples/htmfileexplorer2.lpi
index 3787ee50e4..a4a7fb5efe 100644
--- a/components/turbopower_ipro/examples/htmfileexplorer2.lpi
+++ b/components/turbopower_ipro/examples/htmfileexplorer2.lpi
@@ -1,20 +1,22 @@
-
+
+
-
-
-
+
+
+
+
@@ -53,8 +55,13 @@
-
+
+
+
+
+
+
@@ -62,8 +69,5 @@
-
-
-