Browse Source

Opening same file in a second window don't destroy any changes

Margers 11 months ago
parent
commit
528ff51a8f
1 changed files with 3 additions and 1 deletions
  1. 3 1
      packages/ide/fpviews.pas

+ 3 - 1
packages/ide/fpviews.pas

@@ -2217,7 +2217,9 @@ begin
     AFileName:='';
     AFileName:='';
   New(Editor, Init(R, HSB, VSB, Indicator,AFileName));
   New(Editor, Init(R, HSB, VSB, Indicator,AFileName));
   Editor^.GrowMode:=gfGrowHiX+gfGrowHiY;
   Editor^.GrowMode:=gfGrowHiX+gfGrowHiY;
-  if LoadFile then
+  {load from file if there is no other window with the same file }
+  if Editor^.Core^.GetBindingCount = 1 then
+    if LoadFile then
     begin
     begin
       if Editor^.LoadFile=false then
       if Editor^.LoadFile=false then
         ErrorBox(FormatStrStr(msg_errorreadingfile,AFileName),nil)
         ErrorBox(FormatStrStr(msg_errorreadingfile,AFileName),nil)