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: trunk@42801 -
This commit is contained in:
mattias 2013-09-15 06:10:28 +00:00
parent 72c167855f
commit 1e8926baa8
13 changed files with 17 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
debugger/debugger.pp
View File

@ -1929,7 +1929,7 @@ type
procedure SetMonitor(const AValue: TCallStackMonitor);
protected
procedure RequestCount(ACallstack: TCurrentCallStack); virtual;
procedure RequestAtLeastCount(ACallstack: TCurrentCallStack; ARequiredMinCount: Integer); virtual;
procedure RequestAtLeastCount(ACallstack: TCurrentCallStack; {%H-}ARequiredMinCount: Integer); virtual;
procedure RequestCurrent(ACallstack: TCurrentCallStack); virtual;
procedure RequestEntries(ACallstack: TCurrentCallStack); virtual;
procedure CurrentChanged;

2
ide/buildlazdialog.pas
View File

@ -50,7 +50,7 @@ uses
ComCtrls, DividerBevel, DefineTemplates, CodeToolManager,
// IDEIntf
LazIDEIntf, IDEMsgIntf, IDEHelpIntf, IDEImagesIntf, IDEWindowIntf, IDEDialogs,
PackageIntf, IDEExternToolIntf,
PackageIntf,
// IDE
LazarusIDEStrConsts, TransferMacros, LazConf, IDEProcs, DialogProcs,
MainBar, ExtToolEditDlg, EnvironmentOpts,

2
ide/buildmanager.pas
View File

@ -35,7 +35,7 @@ uses
Classes, SysUtils, AVL_Tree,
// LCL
LConvEncoding, InterfaceBase, LCLProc, Dialogs, FileUtil, Laz2_XMLCfg,
LazUTF8, LazUTF8Classes, Forms, Controls,
LazUTF8, Forms, Controls,
// codetools
ExprEval, BasicCodeTools, CodeToolManager, DefineTemplates, CodeCache,
FileProcs, CodeToolsCfgScript, CodeToolsStructs,

4
ide/checklfmdlg.pas
View File

@ -41,11 +41,11 @@ uses
PropEdits, IDEDialogs, ComponentReg, PackageIntf, IDEWindowIntf,
CustomFormEditor, LazarusIDEStrConsts,
{$IFDEF EnableNewExtTools}
IDEExternToolIntf,
{$ELSE}
OutputFilter,
{$ENDIF}
IDEProcs, IDEOptionDefs, EditorOptions, ExtCtrls, JITForms, PropEditUtils,
IDEMsgIntf, IDEExternToolIntf;
IDEMsgIntf;
type

4
ide/compiler.pp
View File

@ -41,10 +41,11 @@ uses
Classes, SysUtils, Process, LCLProc, Forms, Controls, contnrs, strutils, FileUtil,
LazarusIDEStrConsts, CompilerOptions, Project,
{$IFDEF EnableNewExtTools}
IDEExternToolIntf,
{$ELSE}
OutputFilter,
{$ENDIF}
UTF8Process, InfoBuild, IDEMsgIntf, CompOptsIntf, IDEExternToolIntf,
UTF8Process, InfoBuild, IDEMsgIntf, CompOptsIntf,
DefineTemplates, TransferMacros, EnvironmentOpts, LazFileUtils;
type
@ -950,6 +951,7 @@ var
begin
Result := mrOK;
LastGroup := fRootOptGroup;
GroupItems:=nil;
for i := 0 to aLines.Count-1 do
begin
ThisLine := StringReplace(aLines[i],'-Agas-darwinAssemble','-Agas-darwin Assemble',[]);

2
ide/exttooldialog.pas
View File

@ -39,7 +39,7 @@ uses
{$IFDEF IDE_MEM_CHECK}
MemCheck,
{$ENDIF}
Classes, SysUtils, Process, contnrs, LCLType, LCLProc, Controls, Forms,
Classes, SysUtils, Process, LCLType, LCLProc, Controls, Forms,
Buttons, StdCtrls, ComCtrls, Dialogs, ExtCtrls, ButtonPanel, Menus,
LazConfigStorage, FileProcs, UTF8Process,
IDEExternToolIntf, IDEImagesIntf, IDEDialogs, IDEHelpIntf, IDECommands,

2
ide/exttooleditdlg.pas
View File

@ -42,7 +42,7 @@ uses
{$IFDEF IDE_MEM_CHECK}
MemCheck,
{$ENDIF}
Classes, SysUtils, contnrs, FileUtil, LazConfigStorage, LazUTF8, LCLType,
Classes, SysUtils, FileUtil, LazUTF8, LCLType,
Controls, Forms, Buttons, StdCtrls, Dialogs, ExtCtrls, LCLProc, ButtonPanel,
IDEMsgIntf, IDEExternToolIntf, IDEHelpIntf, PropEdits, IDEDialogs,
IDECommands, FileProcs, TransferMacros, LazarusIDEStrConsts, EnvironmentOpts,

4
ide/genericchecklist.pas
View File

@ -6,7 +6,7 @@ unit GenericCheckList;
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel, CheckLst, LazarusIDEStrConsts, Buttons;
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel, CheckLst, Buttons;
type
@ -15,7 +15,7 @@ type
TGenericCheckListForm = class(TForm)
ButtonPanel1: TButtonPanel;
CheckListBox1: TCheckListBox;
procedure CheckListBox1ItemClick(Sender: TObject; Index: integer);
procedure CheckListBox1ItemClick(Sender: TObject; {%H-}Index: integer);
procedure FormShow(Sender: TObject);
private
fActionBtn: TBitBtn;

2
ide/genericlisteditor.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ButtonPanel,
StdCtrls, LazarusIDEStrConsts;
StdCtrls;
type

2
ide/idecmdline.pas
View File

@ -38,7 +38,7 @@ unit IDECmdLine;
interface
uses
Classes, SysUtils, FileUtil, LazFileUtils, LazUTF8Classes, BaseIDEIntf,
Classes, SysUtils, FileUtil, LazFileUtils, LazUTF8Classes,
LazLogger, LazConf, LCLProc;
const

2
ide/mainbar.pas
View File

@ -41,7 +41,7 @@ uses
Classes, SysUtils, LCLProc, Forms, Controls, Buttons, Menus,
ComCtrls, ExtCtrls, Dialogs, LMessages,
// IDEIntf
ProjectIntf, NewItemIntf, MenuIntf, LazIDEIntf, ExtendedTabControls,
ProjectIntf, NewItemIntf, MenuIntf, LazIDEIntf,
EnvironmentOpts, LazarusIDEStrConsts;
type

2
ide/project.pp
View File

@ -3477,7 +3477,7 @@ var
FFlags:=FFlags-[pfUseDefaultCompilerOptions];
end;
procedure LoadCustomDefines(aConfig: TXMLConfig; const Path: string; Merge: boolean);
procedure LoadCustomDefines(aConfig: TXMLConfig; const Path: string; {%H-}Merge: boolean);
var
Cnt, i: Integer;
s: String;

2
ide/sourcesyneditor.pas
View File

@ -46,7 +46,7 @@ uses
{$IFDEF WinIME}
LazSynIMM,
{$ENDIF}
Classes, SysUtils, Controls, LCLProc, LCLType, Graphics, Menus, math, LazarusIDEStrConsts,
Classes, SysUtils, Controls, LCLProc, LCLType, Graphics, Menus, LazarusIDEStrConsts,
SynEdit, SynEditMiscClasses, SynGutter, SynGutterBase, SynEditMarks, SynEditTypes,
SynGutterLineNumber, SynGutterCodeFolding, SynGutterMarks, SynGutterChanges,
SynGutterLineOverview, SynEditMarkup, SynEditMarkupGutterMark, SynEditMarkupSpecialLine,