2
0
Эх сурвалжийг харах

CompForm: Dropping a file should prompt to save all files.

Jordan Russell 5 жил өмнө
parent
commit
420073e8ce
1 өөрчлөгдсөн 1 нэмэгдсэн , 1 устгасан
  1. 1 1
      Projects/CompForm.pas

+ 1 - 1
Projects/CompForm.pas

@@ -3044,7 +3044,7 @@ end;
 procedure TCompileForm.MainMemoDropFiles(Sender: TObject; X, Y: Integer;
   AFiles: TStrings);
 begin
-  if (AFiles.Count > 0) and ConfirmCloseFile(True, True) then
+  if (AFiles.Count > 0) and ConfirmCloseFile(True, False) then
     OpenFile(FMainMemo, AFiles[0], True);
 end;