mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-28 16:40:48 +02:00
clean up
git-svn-id: trunk@9872 -
This commit is contained in:
parent
6bd8ad382a
commit
755fdd0473
@ -36,10 +36,11 @@ unit ProjectOpts;
|
||||
interface
|
||||
|
||||
uses
|
||||
Arrow, Buttons, LCLProc, Classes, CodeToolManager, Controls, Dialogs,
|
||||
ExtCtrls, Forms, Graphics, IDEOptionDefs, IDEWindowIntf, LazarusIDEStrConsts,
|
||||
LCLIntf, LResources, Project, ProjectIntf, StdCtrls, SysUtils, IDEProcs, Spin,
|
||||
W32VersionInfo, VersionInfoAdditionalInfo;
|
||||
Arrow, Buttons, StdCtrls, SysUtils, LCLProc, Classes, CodeToolManager,
|
||||
Controls, Dialogs, LCLIntf, LResources, ExtCtrls, Forms, Graphics, Spin,
|
||||
IDEWindowIntf, ProjectIntf,
|
||||
IDEOptionDefs, LazarusIDEStrConsts, Project, IDEProcs, W32VersionInfo,
|
||||
VersionInfoAdditionalInfo;
|
||||
|
||||
type
|
||||
|
||||
@ -85,7 +86,7 @@ type
|
||||
RunnableCheckBox: TCheckBox;
|
||||
AlwaysBuildCheckBox: TCheckBox;
|
||||
|
||||
//lazdoc settings
|
||||
// Lazdoc settings
|
||||
LazDocBrowseButton: TButton;
|
||||
LazDocPathEdit: TEdit;
|
||||
LazDocDeletePathButton: TButton;
|
||||
@ -832,6 +833,7 @@ begin
|
||||
CodeToolBoss.ErrorMessage,
|
||||
mtWarning, [mbCancel], 0);
|
||||
Result := False;
|
||||
exit;
|
||||
end// set Application.Title:= statement
|
||||
;
|
||||
|
||||
@ -844,6 +846,7 @@ begin
|
||||
CodeToolBoss.ErrorMessage,
|
||||
mtWarning, [mbCancel], 0);
|
||||
Result := False;
|
||||
exit;
|
||||
end// delete title
|
||||
;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user