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

Clean and reorder more uses sections to prevent "deprecated" warnings.

Browse Source 
git-svn-id: trunk@49656 -
This commit is contained in:
juha 2015-08-12 10:19:37 +00:00
parent 0e783282e9
commit 14ddc8f033
6 changed files with 10 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/fppkg/src/fppkg_details.pas
View File

@ -58,9 +58,7 @@ type
procedure FormShow(Sender: TObject);
private
FPackageName: string;
{ private declarations }
public
{ public declarations }
property PackageName: string read FPackageName write FPackageName;
end;

5
components/fppkg/src/fppkg_mainfrm.pas
View File

@ -39,7 +39,7 @@ uses
fppkg_optionsfrm, fppkg_details,
//IDE interface
{$IFDEF LazarusIDEPackage}
IDEIntf, PackageIntf, IDECommands, contnrs, fppkg_lpk,
PackageIntf, IDECommands, contnrs, fppkg_lpk,
{$ENDIF}
// Repository handler objects
fprepos,
@ -119,7 +119,6 @@ type
procedure SupportCheckGroupItemClick(Sender: TObject; Index: integer);
procedure UpdateButtonClick(Sender: TObject);
private
{ private declarations }
SearchPhrases: TStrings;
function FindSearchPhrase(pkg: TLazPackageData): boolean;
@ -134,7 +133,7 @@ type
procedure UpdatePackageListView;
procedure ListPackages;
public
{ public declarations }
end;
var

7
components/fppkg/src/fppkg_optionsfrm.pas
View File

@ -34,8 +34,8 @@ unit fppkg_optionsfrm;
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ComCtrls,
ButtonPanel, StdCtrls, EditBtn, ExtCtrls, Buttons, pkgoptions, pkgglobals;
SysUtils, Forms, Dialogs, ComCtrls, ButtonPanel, StdCtrls, ExtCtrls, Buttons,
pkgoptions, pkgglobals;
type
TPkgColumn = record
@ -126,9 +126,8 @@ type
procedure RemoveFromVisibleColumnsButtonClick(Sender: TObject);
private
procedure SetupColumnVisibility;
{ private declarations }
public
{ public declarations }
end;
var

6
components/fppkg/src/laz_pkgcommands.pas
View File

@ -5,14 +5,12 @@ unit laz_pkgcommands;
interface
uses
Classes, SysUtils,pkghandler,laz_pkghandler;
pkghandler;
implementation
uses
zipper,
pkgmessages, pkgglobals, pkgoptions, pkgdownload, pkgrepos, fprepos,
laz_pkgrepos, pkgfpmake;
pkgglobals, pkgoptions, pkgdownload, pkgrepos, laz_pkgrepos, pkgfpmake;
type
{ TCommandLazListPackages }

2
components/fppkg/src/laz_pkghandler.pas
View File

@ -5,7 +5,7 @@ unit laz_pkghandler;
interface
uses
Classes, SysUtils, pkghandler, pkgglobals, pkgmessages;
pkghandler, pkgglobals, pkgmessages;
procedure Laz_ExecuteAction(const APackageName,AAction:string);

4
lcl/interfaces/win32/win32wsmenus.pp
View File

@ -32,8 +32,8 @@ uses
////////////////////////////////////////////////////
WSMenus, WSLCLClasses, WSProc,
Windows, Controls, Classes, SysUtils, Win32Int, Win32Proc, Win32WSImgList,
InterfaceBase, LCLProc, LazUTF8, Themes, UxTheme, Win32Themes, Win32Extra,
FileUtil;
LCLProc, Themes, UxTheme, Win32Themes, Win32Extra,
FileUtil, LazUTF8;
type