dockmanager example: added form to package

git-svn-id: trunk@22446 -
This commit is contained in:
dodi 2009-11-05 12:17:17 +00:00
parent 4f4198a75b
commit 12ede50c64
2 changed files with 16 additions and 2 deletions

View File

@ -17,7 +17,7 @@
<Description Value="EasyDocking Manager and Notebook"/> <Description Value="EasyDocking Manager and Notebook"/>
<License Value="LGPL"/> <License Value="LGPL"/>
<Version Major="1"/> <Version Major="1"/>
<Files Count="5"> <Files Count="8">
<Item1> <Item1>
<Filename Value="easydocksite.pas"/> <Filename Value="easydocksite.pas"/>
<UnitName Value="EasyDockSite"/> <UnitName Value="EasyDockSite"/>
@ -38,6 +38,19 @@
<Filename Value="ffloatingsite.pas"/> <Filename Value="ffloatingsite.pas"/>
<UnitName Value="ffloatingsite"/> <UnitName Value="ffloatingsite"/>
</Item5> </Item5>
<Item6>
<Filename Value="felasticsite.lfm"/>
<Type Value="LFM"/>
</Item6>
<Item7>
<Filename Value="felasticsite.lrs"/>
<Type Value="LRS"/>
</Item7>
<Item8>
<Filename Value="felasticsite.pas"/>
<HasRegisterProc Value="True"/>
<UnitName Value="fElasticSite"/>
</Item8>
</Files> </Files>
<Type Value="RunAndDesignTime"/> <Type Value="RunAndDesignTime"/>
<RequiredPkgs Count="2"> <RequiredPkgs Count="2">

View File

@ -7,12 +7,13 @@ unit EasyDockMgr;
interface interface
uses uses
EasyDockSite, fDockBook, fFloatingSite, LazarusPackageIntf; EasyDockSite, fDockBook, fFloatingSite, fElasticSite, LazarusPackageIntf;
implementation implementation
procedure Register; procedure Register;
begin begin
RegisterUnit('fElasticSite', @fElasticSite.Register);
end; end;
initialization initialization