mirror of https://gitlab.com/basile.b/dexed.git
identifier typo
This commit is contained in:
parent
9aaaa32ac5
commit
aedbdd92ab
|
@ -27,7 +27,7 @@ type
|
||||||
property OnMouseWheel;
|
property OnMouseWheel;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
TAsynWait = (awNo, awYes, awCustom);
|
TAsyncWait = (awNo, awYes, awCustom);
|
||||||
|
|
||||||
TRunnableToFolderCondition = (
|
TRunnableToFolderCondition = (
|
||||||
ifInProject, // runnable src is part of the project
|
ifInProject, // runnable src is part of the project
|
||||||
|
@ -460,7 +460,7 @@ type
|
||||||
function closeProj: boolean;
|
function closeProj: boolean;
|
||||||
procedure showProjTitle;
|
procedure showProjTitle;
|
||||||
function checkProjectLock(message: boolean = true): boolean;
|
function checkProjectLock(message: boolean = true): boolean;
|
||||||
procedure compileGroup(async: TAsynWait);
|
procedure compileGroup(async: TAsyncWait);
|
||||||
|
|
||||||
// mru
|
// mru
|
||||||
procedure mruChange(Sender: TObject);
|
procedure mruChange(Sender: TObject);
|
||||||
|
@ -3518,7 +3518,7 @@ end;
|
||||||
|
|
||||||
// TODO-cprojectsgroup: add a "out of mem" protection in async mode.
|
// TODO-cprojectsgroup: add a "out of mem" protection in async mode.
|
||||||
|
|
||||||
procedure TCEMainForm.compileGroup(async: TAsynWait);
|
procedure TCEMainForm.compileGroup(async: TAsyncWait);
|
||||||
var
|
var
|
||||||
i, j: integer;
|
i, j: integer;
|
||||||
begin
|
begin
|
||||||
|
@ -3582,11 +3582,9 @@ end;
|
||||||
|
|
||||||
procedure TCEMainForm.actProjNewGroupExecute(Sender: TObject);
|
procedure TCEMainForm.actProjNewGroupExecute(Sender: TObject);
|
||||||
begin
|
begin
|
||||||
if fProjectGroup.groupModified then
|
if fProjectGroup.groupModified and
|
||||||
begin
|
(dlgFileChangeClose(fProjectGroup.groupFilename, UnsavedPGrp) = mrCancel) then
|
||||||
if dlgFileChangeClose(fProjectGroup.groupFilename, UnsavedPGrp) = mrCancel then
|
|
||||||
exit;
|
exit;
|
||||||
end;
|
|
||||||
fProjectGroup.closeGroup;
|
fProjectGroup.closeGroup;
|
||||||
end;
|
end;
|
||||||
{$ENDREGION}
|
{$ENDREGION}
|
||||||
|
|
Loading…
Reference in New Issue