paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-09 01:28:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: clean up

Browse Source 
git-svn-id: branches/fixes_2_0@60853 -
This commit is contained in:
mattias 2019-04-06 08:13:21 +00:00
parent 79ba94760d
commit 0a36945032
4 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/mainintf.pas
View File

@ -70,7 +70,7 @@ uses
PropEdits, ObjectInspector, MenuIntf, SrcEditorIntf, ProjectIntf,
CompOptsIntf, LazIDEIntf, IDEWindowIntf,
// IDE
LazConf, LazarusIDEStrConsts, Project, PublishModule, BuildLazDialog,
LazConf, LazarusIDEStrConsts, Project, BuildLazDialog,
ProgressDlg, EnvironmentOpts, IDEDefs, PackageDefs;
type

4
packager/addfpmakedependencydlg.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, ButtonPanel, StdCtrls,
ListFilterEdit, fgl,
ListFilterEdit,
ProjPackCommon,
PackageDefs,
LazarusIDEStrConsts,
@ -34,7 +34,7 @@ type
destructor Destroy; override;
end;
function ShowAddFPMakeDependencyDlg(AProjPack: IProjPack;
function ShowAddFPMakeDependencyDlg({%H-}AProjPack: IProjPack;
out AResultDependencies: TPkgDependencyList): TModalResult;
implementation

7
packager/addtopackagedlg.pas
View File

@ -30,7 +30,7 @@ unit AddToPackageDlg;
interface
uses
Math, Classes, SysUtils, Laz_AVL_Tree,
Classes, SysUtils, Laz_AVL_Tree,
// LCL
LCLProc, LCLType, Forms, Controls, Buttons, ExtDlgs, StdCtrls, ExtCtrls,
Dialogs, ComCtrls, ButtonPanel,
@ -40,8 +40,8 @@ uses
NewItemIntf, PackageIntf, FormEditingIntf, IDEWindowIntf, ComponentReg,
IDEDialogs,
// IDE
LazarusIDEStrConsts, InputHistory, IDEDefs, EnvironmentOpts,
PackageSystem, PackageDefs, ProjPackChecks;
LazarusIDEStrConsts, InputHistory, EnvironmentOpts,
PackageSystem, PackageDefs;
type
@ -81,6 +81,7 @@ type
InfoLabel: TLabel;
Title: string;
FileName: string;
public
constructor Create(aBtn: TBitBtn; aInfoLabel: TLabel; aTitle: string);
procedure LoadIcon(aLazPackage: TLazPackage; aFileName: string);
end;

1
packager/packageeditor.pas
View File

@ -724,7 +724,6 @@ type
procedure TPackageEditorForm.ItemsPopupMenuPopup(Sender: TObject);
var
UserSelection: PackageSelTypes;
SingleSelectedNode: TPkgDependency;
SingleSelectedFile: TPkgFile;
SingleSelectedDep: TPkgDependency;