fix cases where project inspectors were not cleared

revealed by project groups, and it was confusing.
This commit is contained in:
Basile Burg 2016-06-15 09:16:58 +02:00
parent c509e34be4
commit fb51972a58
2 changed files with 7 additions and 0 deletions

View File

@ -204,7 +204,11 @@ begin
fProj := nil; fProj := nil;
enabled := false; enabled := false;
if aProject.getFormat <> pfDub then if aProject.getFormat <> pfDub then
begin
updateEditor;
updateInspector;
exit; exit;
end;
fProj := TCEDubProject(aProject.getProject); fProj := TCEDubProject(aProject.getProject);
enabled := true; enabled := true;
if not Visible then if not Visible then

View File

@ -183,7 +183,10 @@ begin
enabled := false; enabled := false;
fLastFileOrFolder := ''; fLastFileOrFolder := '';
if aProject.getFormat <> pfNative then if aProject.getFormat <> pfNative then
begin
updateImperative;
exit; exit;
end;
enabled := true; enabled := true;
// //
fProject := TCENativeProject(aProject.getProject); fProject := TCENativeProject(aProject.getProject);