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 @@ <ResourceType Value="res"/> <UseXPManifest Value="True"/> - <Icon Value="0"/> </General> <i18n> <EnableI18N LFM="False"/> @@ -50,9 +49,10 @@ <ComponentName Value="frMain"/> <HasResources Value="True"/> <ResourceBaseClass Value="Form"/> - <IsVisibleTab Value="True"/> + <CursorPos X="20" Y="16"/> <UsageCount Value="20"/> <Loaded Value="True"/> + <LoadedDesigner Value="True"/> </Unit1> </Units> </ProjectOptions> 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 @@ -<?xml version="1.0"?> +<?xml version="1.0" encoding="UTF-8"?> <CONFIG> <ProjectOptions> + <Version Value="9"/> <PathDelim Value="\"/> - <Version Value="7"/> <General> <Flags> <LRSInOutputDirectory Value="False"/> </Flags> <SessionStorage Value="InIDEConfig"/> <MainUnit Value="0"/> - <TargetFileExt Value=".exe"/> <Title Value="HtmFileExplorer1"/> </General> <VersionInfo> - <ProjectVersion Value=""/> + <StringTable ProductVersion=""/> </VersionInfo> + <BuildModes Count="1"> + <Item1 Name="default" Default="True"/> + </BuildModes> <PublishOptions> <Version Value="2"/> <IgnoreBinaries Value="False"/> @@ -53,8 +55,13 @@ </Units> </ProjectOptions> <CompilerOptions> - <Version Value="8"/> + <Version Value="11"/> <PathDelim Value="\"/> + <Parsing> + <SyntaxOptions> + <UseAnsiStrings Value="False"/> + </SyntaxOptions> + </Parsing> <Linking> <Options> <Win32> @@ -62,8 +69,5 @@ </Win32> </Options> </Linking> - <Other> - <CompilerPath Value="$(CompPath)"/> - </Other> </CompilerOptions> </CONFIG> 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 @@ -<?xml version="1.0"?> +<?xml version="1.0" encoding="UTF-8"?> <CONFIG> <ProjectOptions> + <Version Value="9"/> <PathDelim Value="\"/> - <Version Value="7"/> <General> <Flags> <LRSInOutputDirectory Value="False"/> </Flags> <SessionStorage Value="InIDEConfig"/> <MainUnit Value="0"/> - <TargetFileExt Value=".exe"/> <Title Value="HtmFileExplorer2"/> </General> <VersionInfo> - <ProjectVersion Value=""/> + <StringTable ProductVersion=""/> </VersionInfo> + <BuildModes Count="1"> + <Item1 Name="default" Default="True"/> + </BuildModes> <PublishOptions> <Version Value="2"/> <IgnoreBinaries Value="False"/> @@ -53,8 +55,13 @@ </Units> </ProjectOptions> <CompilerOptions> - <Version Value="8"/> + <Version Value="11"/> <PathDelim Value="\"/> + <Parsing> + <SyntaxOptions> + <UseAnsiStrings Value="False"/> + </SyntaxOptions> + </Parsing> <Linking> <Options> <Win32> @@ -62,8 +69,5 @@ </Win32> </Options> </Linking> - <Other> - <CompilerPath Value="$(CompPath)"/> - </Other> </CompilerOptions> </CONFIG>