forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

prevent to add the FSP to the group if not yet saved

This commit is contained in:
Basile Burg 2016-08-15 02:19:47 +02:00
parent b7a74c2e0c
commit 42fa9149b0
2 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ce_main.pas
View File

@ -3197,6 +3197,8 @@ begin
exit; exit;
if fFreeProj.inGroup then if fFreeProj.inGroup then
exit; exit;
if not fFreeProj.filename.fileExists then
exit;
fProjectGroup.addProject(fFreeProj); fProjectGroup.addProject(fFreeProj);
fFreeProj := nil; fFreeProj := nil;
end; end;

2
src/ce_projgroup.pas
View File

@ -534,6 +534,8 @@ procedure TCEProjectGroupWidget.btnAddUnfocusedClick(Sender: TObject);
begin begin
if fFreeProj = nil then if fFreeProj = nil then
exit; exit;
if not fFreeProj.filename.fileExists then
exit;
projectGroup.addProject(fFreeProj); projectGroup.addProject(fFreeProj);
fFreeProj := nil; fFreeProj := nil;
updateList; updateList;