paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-10-16 03:57:03 +02:00
Code Issues Packages Projects Releases Wiki Activity

examples: less hints

Browse Source 
git-svn-id: trunk@51776 -
This commit is contained in:
mattias 2016-03-01 15:20:46 +00:00
parent a7dd254e51
commit 135960b35a
10 changed files with 62 additions and 60 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
examples/codepageconverter/filefind/filefindlaz.pas
View File

@ -1,22 +1,22 @@
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install
the package filefindlaz 1.0.2.
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
}
unit filefindlaz;
unit filefindlaz;
{$warn 5023 off : no warning about unused units}
interface
uses
FileFind, LazarusPackageIntf;
FileFind, LazarusPackageIntf;
implementation
procedure Register;
procedure Register;
begin
RegisterUnit('FileFind', @FileFind.Register);
end;
RegisterUnit('FileFind', @FileFind.Register);
end;
initialization
RegisterPackage('filefindlaz', @Register);
RegisterPackage('filefindlaz', @Register);
end.

15
examples/codetools/jumptoimplementation/jumptoimplementation.pas
View File

@ -1,21 +1,22 @@
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
This source is only used to compile and install the package.
}
unit JumpToImplementation;
unit JumpToImplementation;
{$warn 5023 off : no warning about unused units}
interface
uses
CodeToolsExample1, LazarusPackageIntf;
CodeToolsExample1, LazarusPackageIntf;
implementation
procedure Register;
procedure Register;
begin
RegisterUnit('CodeToolsExample1', @CodeToolsExample1.Register);
end;
RegisterUnit('CodeToolsExample1', @CodeToolsExample1.Register);
end;
initialization
RegisterPackage('JumpToImplementation', @Register);
RegisterPackage('JumpToImplementation', @Register);
end.

15
examples/designerbaseclass/designbaseclassdemopkg.pas
View File

@ -1,21 +1,22 @@
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
This source is only used to compile and install the package.
}
unit DesignBaseClassDemoPkg;
unit DesignBaseClassDemoPkg;
{$warn 5023 off : no warning about unused units}
interface
uses
CustomComponentClass, LazarusPackageIntf;
CustomComponentClass, LazarusPackageIntf;
implementation
procedure Register;
procedure Register;
begin
RegisterUnit('CustomComponentClass', @CustomComponentClass.Register);
end;
RegisterUnit('CustomComponentClass', @CustomComponentClass.Register);
end;
initialization
RegisterPackage('DesignBaseClassDemoPkg', @Register);
RegisterPackage('DesignBaseClassDemoPkg', @Register);
end.

13
examples/designnonlcl/notlcldesigner.pas
View File

@ -1,9 +1,10 @@
{ This file was automatically created by Lazarus. do not edit!
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
}
unit NotLCLDesigner;
unit NotLCLDesigner;
{$warn 5023 off : no warning about unused units}
interface
uses
@ -11,11 +12,11 @@ uses
implementation
procedure Register;
procedure Register;
begin
RegisterUnit('MyWidgetDesigner', @MyWidgetDesigner.Register);
end;
RegisterUnit('MyWidgetDesigner', @MyWidgetDesigner.Register);
end;
initialization
RegisterPackage('NotLCLDesigner', @Register);
RegisterPackage('NotLCLDesigner', @Register);
end.

12
examples/dockmanager/package/easydockmgr.pas
View File

@ -2,20 +2,14 @@
This source is only used to compile and install the package.
}
unit EasyDockMgr;
unit EasyDockMgr;
{$warn 5023 off : no warning about unused units}
interface
uses
EasyDockSite, fDockBook, fFloatingSite, uMiniRestore, uMakeSite,
LazarusPackageIntf;
EasyDockSite, fDockBook, fFloatingSite, uMiniRestore, uMakeSite;
implementation
procedure Register;
begin
end;
initialization
RegisterPackage('EasyDockMgr', @Register);
end.

15
examples/exploremenu/exploreidemenu.pas
View File

@ -1,21 +1,22 @@
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
This source is only used to compile and install the package.
}
unit exploreidemenu;
unit exploreidemenu;
{$warn 5023 off : no warning about unused units}
interface
uses
frmExploreMenu, LazarusPackageIntf;
frmExploreMenu, LazarusPackageIntf;
implementation
procedure Register;
procedure Register;
begin
RegisterUnit('frmExploreMenu', @frmExploreMenu.Register);
end;
RegisterUnit('frmExploreMenu', @frmExploreMenu.Register);
end;
initialization
RegisterPackage('exploreidemenu', @Register);
RegisterPackage('exploreidemenu', @Register);
end.

17
examples/gridexamples/grid_semaphor/semaphorgridlpk.pas
View File

@ -1,22 +1,23 @@
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
This source is only used to compile and install the package.
}
unit SemaphorGridLPK;
unit SemaphorGridLPK;
{$warn 5023 off : no warning about unused units}
interface
uses
SemaphorGrids, SemaphorDBGrids, LazarusPackageIntf;
SemaphorGrids, SemaphorDBGrids, LazarusPackageIntf;
implementation
procedure Register;
procedure Register;
begin
RegisterUnit('SemaphorGrids', @SemaphorGrids.Register);
RegisterUnit('SemaphorDBGrids', @SemaphorDBGrids.Register);
end;
RegisterUnit('SemaphorGrids', @SemaphorGrids.Register);
RegisterUnit('SemaphorDBGrids', @SemaphorDBGrids.Register);
end;
initialization
RegisterPackage('SemaphorGridLPK', @Register);
RegisterPackage('SemaphorGridLPK', @Register);
end.

1
examples/idehelp/demoidehelp.pas
View File

@ -4,6 +4,7 @@
unit DemoIDEHelp;
{$warn 5023 off : no warning about unused units}
interface
uses

15
examples/idequickfix/quickfixexample.pas
View File

@ -1,21 +1,22 @@
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
This source is only used to compile and install the package.
}
unit QuickFixExample;
unit QuickFixExample;
{$warn 5023 off : no warning about unused units}
interface
uses
QuickFixDemo1, LazarusPackageIntf;
QuickFixDemo1, LazarusPackageIntf;
implementation
procedure Register;
procedure Register;
begin
RegisterUnit('QuickFixDemo1', @QuickFixDemo1.Register);
end;
RegisterUnit('QuickFixDemo1', @QuickFixDemo1.Register);
end;
initialization
RegisterPackage('QuickFixExample', @Register);
RegisterPackage('QuickFixExample', @Register);
end.

1
examples/xmlresource/xmlresource.pas
View File

@ -4,6 +4,7 @@
unit xmlresource;
{$warn 5023 off : no warning about unused units}
interface
uses