diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas index 06e12a17..e8a97f83 100644 --- a/src/ce_synmemo.pas +++ b/src/ce_synmemo.pas @@ -2489,9 +2489,17 @@ var str: TStringList; txt: string; begin - if (fFilename = fTempFileName) or fDisableFileDateCheck - or not FileAge(fFilename, newDate) or (fFileDate = newDate) then + if fDisableFileDateCheck then exit; + if fFilename.isNotEmpty and not fFilename.fileExists and + (fFilename <> '') then + begin + // cant use a dialog: dialog closed -> doc focused -> warn again, etc + getMessageDisplay.message(fFilename + ' does not exist anymore', self, amcEdit, amkWarn); + end; + if (fFilename = fTempFileName) or fDisableFileDateCheck + or not FileAge(fFilename, newDate) or (fFileDate = newDate) then + exit; if (fFileDate <> 0.0) then begin str := TStringList.Create;