native proj editor, only enable conf selector when cat is specific to a conf

This commit is contained in:
Basile Burg 2015-09-10 15:56:25 +02:00
parent 5452333f5a
commit 7b66664bc0
1 changed files with 2 additions and 0 deletions

View File

@ -173,6 +173,7 @@ procedure TCEProjectConfigurationWidget.TreeChange(Sender: TObject;
Node: TTreeNode); Node: TTreeNode);
begin begin
inspector.TIObject := getGridTarget; inspector.TIObject := getGridTarget;
selconf.Enabled := (inspector.TIObject <> fProj) and (fProj <> nil);
end; end;
procedure TCEProjectConfigurationWidget.setSyncroMode(aValue: boolean); procedure TCEProjectConfigurationWidget.setSyncroMode(aValue: boolean);
@ -403,6 +404,7 @@ var
begin begin
selConf.ItemIndex:= -1; selConf.ItemIndex:= -1;
selConf.Clear; selConf.Clear;
selconf.Enabled := (inspector.TIObject <> fProj) and (fProj <> nil);
if fProj = nil then exit; if fProj = nil then exit;
// //
for i:= 0 to fProj.OptionsCollection.Count-1 do for i:= 0 to fProj.OptionsCollection.Count-1 do