project groups: save as: rebase TreeView nodes

git-svn-id: trunk@50377 -
This commit is contained in:
mattias 2015-11-17 23:28:08 +00:00
parent 0351081414
commit b4330dfd9e

View File

@ -293,6 +293,7 @@ end;
procedure TProjectGroupEditorForm.SetProjectGroup(AValue: TProjectGroup);
begin
debugln(['TProjectGroupEditorForm.SetProjectGroup START ',FProjectGroup=AValue]);
if FProjectGroup=AValue then Exit;
if ProjectGroup<>nil then
begin