HelpHTML example: remove unused unit references.

git-svn-id: trunk@53708 -
This commit is contained in:
juha 2016-12-17 22:57:53 +00:00
parent 2254a18568
commit 46ff8dcc47
3 changed files with 8 additions and 9 deletions

View File

@ -1,7 +1,7 @@
<?xml version="1.0"?> <?xml version="1.0" encoding="UTF-8"?>
<CONFIG> <CONFIG>
<ProjectOptions> <ProjectOptions>
<Version Value="9"/> <Version Value="10"/>
<General> <General>
<Flags> <Flags>
<LRSInOutputDirectory Value="False"/> <LRSInOutputDirectory Value="False"/>
@ -39,6 +39,8 @@
<Filename Value="unit1.pas"/> <Filename Value="unit1.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<ComponentName Value="Form1"/> <ComponentName Value="Form1"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/> <UnitName Value="Unit1"/>
</Unit1> </Unit1>
<Unit2> <Unit2>
@ -70,8 +72,5 @@
</Win32> </Win32>
</Options> </Options>
</Linking> </Linking>
<Other>
<CompilerPath Value="$(CompPath)"/>
</Other>
</CompilerOptions> </CompilerOptions>
</CONFIG> </CONFIG>

View File

@ -10,9 +10,10 @@ object Form1: TForm1
ClientHeight = 300 ClientHeight = 300
ClientWidth = 400 ClientWidth = 400
OnCreate = FormCreate OnCreate = FormCreate
LCLVersion = '1.7'
object Edit1: TEdit object Edit1: TEdit
Left = 60 Left = 60
Height = 23 Height = 32
Top = 40 Top = 40
Width = 207 Width = 207
HelpType = htKeyword HelpType = htKeyword
@ -22,7 +23,7 @@ object Form1: TForm1
end end
object Edit2: TEdit object Edit2: TEdit
Left = 60 Left = 60
Height = 23 Height = 32
Top = 95 Top = 95
Width = 207 Width = 207
HelpType = htKeyword HelpType = htKeyword

View File

@ -52,8 +52,7 @@ unit Unit1;
interface interface
uses uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Forms, StdCtrls, LazHelpHTML, HelpIntfs;
LazHelpHTML, StdCtrls, Buttons, HelpIntfs;
type type