fix - field editor of the DUB project inspector disabled when creating a DUB project after a SDL one

This commit is contained in:
Basile Burg 2018-12-11 06:00:45 +01:00
parent fa2bce2c49
commit 67e6853bfe
1 changed files with 7 additions and 9 deletions

View File

@ -303,12 +303,7 @@ end;
{$REGION ICEProjectObserver ----------------------------------------------------}
procedure TCEDubProjectEditorWidget.projNew(project: ICECommonProject);
begin
fProj := nil;
enabled := false;
if project.getFormat <> pfDUB then
exit;
enabled := true;
fProj := TCEDubProject(project.getProject);
projFocused(project);
end;
procedure TCEDubProjectEditorWidget.projChanged(project: ICECommonProject);
@ -346,14 +341,17 @@ begin
end;
fProj := TCEDubProject(project.getProject);
enabled := true;
if not Visible then
exit;
if fProj.isSDL then
begin
edProp.Enabled:= false;
btnAcceptProp.Enabled:=false;
end else
begin
edProp.Enabled:= true;
btnAcceptProp.Enabled:=true;
end;
if not Visible then
exit;
updateEditor;
end;