mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-23 16:39:31 +01:00
BuildIntf: Rename LazMessageDialog as LazMessageWorker to avoid name clash and to be more accurate. Same for LazQuestionDialog.
git-svn-id: trunk@63997 -
This commit is contained in:
parent
39b5106525
commit
f6ffe865a0
2
.gitattributes
vendored
2
.gitattributes
vendored
@ -573,7 +573,7 @@ components/buildintf/languages/buildstrconsts.pot svneol=native#text/plain
|
|||||||
components/buildintf/languages/buildstrconsts.pt_BR.po svneol=native#text/plain
|
components/buildintf/languages/buildstrconsts.pt_BR.po svneol=native#text/plain
|
||||||
components/buildintf/languages/buildstrconsts.ru.po svneol=native#text/plain
|
components/buildintf/languages/buildstrconsts.ru.po svneol=native#text/plain
|
||||||
components/buildintf/languages/buildstrconsts.uk.po svneol=native#text/plain
|
components/buildintf/languages/buildstrconsts.uk.po svneol=native#text/plain
|
||||||
components/buildintf/lazmsgdialogs.pas svneol=native#text/pascal
|
components/buildintf/lazmsgworker.pas svneol=native#text/pascal
|
||||||
components/buildintf/macrodefintf.pas svneol=native#text/plain
|
components/buildintf/macrodefintf.pas svneol=native#text/plain
|
||||||
components/buildintf/macrointf.pas svneol=native#text/pascal
|
components/buildintf/macrointf.pas svneol=native#text/pascal
|
||||||
components/buildintf/newitemintf.pas svneol=native#text/pascal
|
components/buildintf/newitemintf.pas svneol=native#text/pascal
|
||||||
|
|||||||
@ -42,8 +42,8 @@
|
|||||||
<UnitName Value="IDEOptionsIntf"/>
|
<UnitName Value="IDEOptionsIntf"/>
|
||||||
</Item>
|
</Item>
|
||||||
<Item>
|
<Item>
|
||||||
<Filename Value="lazmsgdialogs.pas"/>
|
<Filename Value="lazmsgworker.pas"/>
|
||||||
<UnitName Value="LazMsgDialogs"/>
|
<UnitName Value="LazMsgWorker"/>
|
||||||
</Item>
|
</Item>
|
||||||
<Item>
|
<Item>
|
||||||
<Filename Value="macrodefintf.pas"/>
|
<Filename Value="macrodefintf.pas"/>
|
||||||
|
|||||||
@ -9,7 +9,7 @@ interface
|
|||||||
|
|
||||||
uses
|
uses
|
||||||
BaseIDEIntf, BuildStrConsts, CompOptsIntf, FppkgIntf, IDEExternToolIntf,
|
BaseIDEIntf, BuildStrConsts, CompOptsIntf, FppkgIntf, IDEExternToolIntf,
|
||||||
IDEOptionsIntf, LazMsgDialogs, MacroDefIntf, MacroIntf, NewItemIntf,
|
IDEOptionsIntf, LazMsgWorker, MacroDefIntf, MacroIntf, NewItemIntf,
|
||||||
PackageDependencyIntf, PackageIntf, PackageLinkIntf, ProjectIntf,
|
PackageDependencyIntf, PackageIntf, PackageLinkIntf, ProjectIntf,
|
||||||
ProjectResourcesIntf, ProjPackIntf, LazarusPackageIntf;
|
ProjectResourcesIntf, ProjPackIntf, LazarusPackageIntf;
|
||||||
|
|
||||||
|
|||||||
@ -47,7 +47,7 @@ begin
|
|||||||
t.Dependencies.AddUnit('fppkgintf');
|
t.Dependencies.AddUnit('fppkgintf');
|
||||||
t.Dependencies.AddUnit('ideexterntoolintf');
|
t.Dependencies.AddUnit('ideexterntoolintf');
|
||||||
t.Dependencies.AddUnit('ideoptionsintf');
|
t.Dependencies.AddUnit('ideoptionsintf');
|
||||||
t.Dependencies.AddUnit('lazmsgdialogs');
|
t.Dependencies.AddUnit('lazmsgworker');
|
||||||
t.Dependencies.AddUnit('macrodefintf');
|
t.Dependencies.AddUnit('macrodefintf');
|
||||||
t.Dependencies.AddUnit('macrointf');
|
t.Dependencies.AddUnit('macrointf');
|
||||||
t.Dependencies.AddUnit('newitemintf');
|
t.Dependencies.AddUnit('newitemintf');
|
||||||
@ -64,7 +64,7 @@ begin
|
|||||||
T:=P.Targets.AddUnit('fppkgintf.pas');
|
T:=P.Targets.AddUnit('fppkgintf.pas');
|
||||||
T:=P.Targets.AddUnit('ideexterntoolintf.pas');
|
T:=P.Targets.AddUnit('ideexterntoolintf.pas');
|
||||||
T:=P.Targets.AddUnit('ideoptionsintf.pas');
|
T:=P.Targets.AddUnit('ideoptionsintf.pas');
|
||||||
T:=P.Targets.AddUnit('lazmsgdialogs.pas');
|
T:=P.Targets.AddUnit('lazmsgworker.pas');
|
||||||
T:=P.Targets.AddUnit('macrodefintf.pas');
|
T:=P.Targets.AddUnit('macrodefintf.pas');
|
||||||
T:=P.Targets.AddUnit('macrointf.pas');
|
T:=P.Targets.AddUnit('macrointf.pas');
|
||||||
T:=P.Targets.AddUnit('newitemintf.pas');
|
T:=P.Targets.AddUnit('newitemintf.pas');
|
||||||
|
|||||||
@ -1,4 +1,4 @@
|
|||||||
unit LazMsgDialogs;
|
unit LazMsgWorker;
|
||||||
|
|
||||||
{$mode objfpc}{$H+}
|
{$mode objfpc}{$H+}
|
||||||
|
|
||||||
@ -9,16 +9,16 @@ uses
|
|||||||
UITypes;
|
UITypes;
|
||||||
|
|
||||||
type
|
type
|
||||||
TLazMessageDialog = function(const aCaption, aMsg: string;
|
TLazMessageWorker = function(const aCaption, aMsg: string;
|
||||||
DlgType: TMsgDlgType; Buttons: TMsgDlgButtons;
|
DlgType: TMsgDlgType; Buttons: TMsgDlgButtons;
|
||||||
const HelpKeyword: string = ''): Integer of object;
|
const HelpKeyword: string = ''): Integer of object;
|
||||||
TLazQuestionDialog = function(const aCaption, aMsg: string;
|
TLazQuestionWorker = function(const aCaption, aMsg: string;
|
||||||
DlgType: TMsgDlgType; Buttons: array of const;
|
DlgType: TMsgDlgType; Buttons: array of const;
|
||||||
const HelpKeyword: string = ''): Integer of object;
|
const HelpKeyword: string = ''): Integer of object;
|
||||||
|
|
||||||
var // set by the IDE
|
var // set by the IDE
|
||||||
LazMessageDialog: TLazMessageDialog = nil;
|
LazMessageWorker: TLazMessageWorker = nil;
|
||||||
LazQuestionDialog: TLazQuestionDialog = nil;
|
LazQuestionWorker: TLazQuestionWorker = nil;
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
@ -23,7 +23,7 @@ uses
|
|||||||
// LazUtils
|
// LazUtils
|
||||||
UITypes, LazFileCache,
|
UITypes, LazFileCache,
|
||||||
// BuildIntf
|
// BuildIntf
|
||||||
LazMsgDialogs;
|
LazMsgWorker;
|
||||||
|
|
||||||
type
|
type
|
||||||
|
|
||||||
@ -59,11 +59,11 @@ var // set by the IDE
|
|||||||
// Wrapper function for LazIDESelectDirectory with a default parameter.
|
// Wrapper function for LazIDESelectDirectory with a default parameter.
|
||||||
function LazSelectDirectory(const Title: string; const InitialDir: string = ''): string;
|
function LazSelectDirectory(const Title: string; const InitialDir: string = ''): string;
|
||||||
|
|
||||||
// Wrapper function for LazMessageDialog in LazMsgDialogs.
|
// Wrapper function for LazMessageWorker in LazMsgWorker.
|
||||||
function IDEMessageDialog(const aCaption, aMsg: string;
|
function IDEMessageDialog(const aCaption, aMsg: string;
|
||||||
DlgType: TMsgDlgType; Buttons: TMsgDlgButtons;
|
DlgType: TMsgDlgType; Buttons: TMsgDlgButtons;
|
||||||
const HelpKeyword: string = ''): Integer;
|
const HelpKeyword: string = ''): Integer;
|
||||||
// Wrapper function for LazQuestionDialog in LazMsgDialogs.
|
// Wrapper function for LazQuestionWorker in LazMsgWorker.
|
||||||
function IDEQuestionDialog(const aCaption, aMsg: string;
|
function IDEQuestionDialog(const aCaption, aMsg: string;
|
||||||
DlgType: TMsgDlgType; Buttons: array of const;
|
DlgType: TMsgDlgType; Buttons: array of const;
|
||||||
const HelpKeyword: string = ''): Integer;
|
const HelpKeyword: string = ''): Integer;
|
||||||
@ -121,14 +121,14 @@ function IDEMessageDialog(const aCaption, aMsg: string;
|
|||||||
DlgType: TMsgDlgType; Buttons: TMsgDlgButtons;
|
DlgType: TMsgDlgType; Buttons: TMsgDlgButtons;
|
||||||
const HelpKeyword: string = ''): Integer;
|
const HelpKeyword: string = ''): Integer;
|
||||||
begin
|
begin
|
||||||
Result := LazMessageDialog(aCaption, aMsg, DlgType, Buttons, HelpKeyword);
|
Result := LazMessageWorker(aCaption, aMsg, DlgType, Buttons, HelpKeyword);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function IDEQuestionDialog(const aCaption, aMsg: string;
|
function IDEQuestionDialog(const aCaption, aMsg: string;
|
||||||
DlgType: TMsgDlgType; Buttons: array of const;
|
DlgType: TMsgDlgType; Buttons: array of const;
|
||||||
const HelpKeyword: string = ''): Integer;
|
const HelpKeyword: string = ''): Integer;
|
||||||
begin
|
begin
|
||||||
Result := LazQuestionDialog(aCaption, aMsg, DlgType, Buttons, HelpKeyword);
|
Result := LazQuestionWorker(aCaption, aMsg, DlgType, Buttons, HelpKeyword);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function IDEMessageDialogAb(const aCaption, aMsg: string; DlgType: TMsgDlgType;
|
function IDEMessageDialogAb(const aCaption, aMsg: string; DlgType: TMsgDlgType;
|
||||||
|
|||||||
@ -39,8 +39,8 @@ uses
|
|||||||
// LazUtils
|
// LazUtils
|
||||||
FileUtil, LazFileUtils, LazUtilities, LazLoggerBase, UTF8Process, LazUTF8,
|
FileUtil, LazFileUtils, LazUtilities, LazLoggerBase, UTF8Process, LazUTF8,
|
||||||
UITypes, AvgLvlTree,
|
UITypes, AvgLvlTree,
|
||||||
// IDEIntf
|
// BuildIntf
|
||||||
IDEExternToolIntf, BaseIDEIntf, MacroIntf, LazMsgDialogs,
|
IDEExternToolIntf, BaseIDEIntf, MacroIntf, LazMsgWorker,
|
||||||
// IDE
|
// IDE
|
||||||
IDECmdLine, TransferMacros, LazarusIDEStrConsts;
|
IDECmdLine, TransferMacros, LazarusIDEStrConsts;
|
||||||
|
|
||||||
@ -930,7 +930,7 @@ function TExternalTool.ResolveMacros: boolean;
|
|||||||
if Result then exit;
|
if Result then exit;
|
||||||
if ErrorMessage='' then
|
if ErrorMessage='' then
|
||||||
ErrorMessage:=Format(lisInvalidMacrosIn, [aValue]);
|
ErrorMessage:=Format(lisInvalidMacrosIn, [aValue]);
|
||||||
LazMessageDialog(lisCCOErrorCaption, Format(lisInvalidMacrosInExternalTool,
|
LazMessageWorker(lisCCOErrorCaption, Format(lisInvalidMacrosInExternalTool,
|
||||||
[aValue, Title]),
|
[aValue, Title]),
|
||||||
mtError,[mbCancel]);
|
mtError,[mbCancel]);
|
||||||
end;
|
end;
|
||||||
|
|||||||
@ -37,8 +37,8 @@ uses
|
|||||||
LCLPlatformDef, Forms,
|
LCLPlatformDef, Forms,
|
||||||
// Codetools
|
// Codetools
|
||||||
CodeCache, CodeToolManager, DefineTemplates, FileProcs,
|
CodeCache, CodeToolManager, DefineTemplates, FileProcs,
|
||||||
// IDEIntf
|
// BuildIntf
|
||||||
BaseIDEIntf, MacroIntf, PackageIntf, LazMsgDialogs, ProjectIntf, IDEExternToolIntf,
|
BaseIDEIntf, MacroIntf, PackageIntf, LazMsgWorker, ProjectIntf, IDEExternToolIntf,
|
||||||
CompOptsIntf, IDEOptionsIntf, PackageDependencyIntf,
|
CompOptsIntf, IDEOptionsIntf, PackageDependencyIntf,
|
||||||
// IDE
|
// IDE
|
||||||
InitialSetupProc, ExtToolsConsole, CompilerOptions,
|
InitialSetupProc, ExtToolsConsole, CompilerOptions,
|
||||||
@ -1263,8 +1263,8 @@ end;
|
|||||||
|
|
||||||
procedure TLazBuildApplication.SetupDialogs;
|
procedure TLazBuildApplication.SetupDialogs;
|
||||||
begin
|
begin
|
||||||
LazMessageDialog:=@OnIDEMessageDialog;
|
LazMessageWorker:=@OnIDEMessageDialog;
|
||||||
LazQuestionDialog:=@OnIDEQuestionDialog;
|
LazQuestionWorker:=@OnIDEQuestionDialog;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TLazBuildApplication.StoreBaseSettings;
|
procedure TLazBuildApplication.StoreBaseSettings;
|
||||||
|
|||||||
15
ide/main.pp
15
ide/main.pp
@ -76,13 +76,14 @@ uses
|
|||||||
LCLExceptionStacktrace,
|
LCLExceptionStacktrace,
|
||||||
// SynEdit
|
// SynEdit
|
||||||
SynEdit, AllSynEdit, SynEditKeyCmds, SynEditMarks, SynEditHighlighter,
|
SynEdit, AllSynEdit, SynEditKeyCmds, SynEditMarks, SynEditHighlighter,
|
||||||
|
// BuildIntf
|
||||||
|
BaseIDEIntf, MacroIntf, NewItemIntf, IDEExternToolIntf, LazMsgWorker,
|
||||||
|
PackageIntf, ProjectIntf, CompOptsIntf, IDEOptionsIntf,
|
||||||
// IDE interface
|
// IDE interface
|
||||||
IDEIntf, ObjectInspector, PropEdits, PropEditUtils, EditorSyntaxHighlighterDef,
|
IDEIntf, ObjectInspector, PropEdits, PropEditUtils, EditorSyntaxHighlighterDef,
|
||||||
MacroIntf, IDECommands, IDEWindowIntf, ComponentReg, IDEDialogs,
|
IDECommands, IDEWindowIntf, ComponentReg, IDEDialogs, SrcEditorIntf, IDEMsgIntf,
|
||||||
SrcEditorIntf, NewItemIntf, IDEExternToolIntf, IDEMsgIntf, LazMsgDialogs,
|
MenuIntf, LazIDEIntf, IDEOptEditorIntf, IDEImagesIntf, ComponentEditors,
|
||||||
PackageIntf, ProjectIntf, CompOptsIntf, MenuIntf, BaseIDEIntf, LazIDEIntf,
|
ToolBarIntf, SelEdits,
|
||||||
IDEOptionsIntf, IDEOptEditorIntf, IDEImagesIntf, ComponentEditors, ToolBarIntf,
|
|
||||||
SelEdits,
|
|
||||||
// protocol
|
// protocol
|
||||||
IDEProtocol,
|
IDEProtocol,
|
||||||
// compile
|
// compile
|
||||||
@ -2130,8 +2131,8 @@ begin
|
|||||||
LazIDESelectDirectory:=@SelectDirectoryHandler;
|
LazIDESelectDirectory:=@SelectDirectoryHandler;
|
||||||
InitIDEFileDialog:=@InitIDEFileDialogHandler;
|
InitIDEFileDialog:=@InitIDEFileDialogHandler;
|
||||||
StoreIDEFileDialog:=@StoreIDEFileDialogHandler;
|
StoreIDEFileDialog:=@StoreIDEFileDialogHandler;
|
||||||
LazMessageDialog:=@IDEMessageDialogHandler;
|
LazMessageWorker:=@IDEMessageDialogHandler;
|
||||||
LazQuestionDialog:=@IDEQuestionDialogHandler;
|
LazQuestionWorker:=@IDEQuestionDialogHandler;
|
||||||
TestCompilerOptions:=@CompilerOptionsDialogTest;
|
TestCompilerOptions:=@CompilerOptionsDialogTest;
|
||||||
CheckCompOptsAndMainSrcForNewUnitEvent:=@CheckForNewUnit;
|
CheckCompOptsAndMainSrcForNewUnitEvent:=@CheckForNewUnit;
|
||||||
end;
|
end;
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user