LazMapViewer: Avoid new cache-downloadengine to hang when cache file does not exist.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9490 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2024-10-22 15:32:25 +00:00 · 2024-10-22 15:32:25 +00:00 · a204dfcd7a
commit a204dfcd7a
parent b6619dd30e
1 changed files with 4 additions and 1 deletions
--- a/components/lazmapviewer/source/mvengine.pas
+++ b/components/lazmapviewer/source/mvengine.pas
@ -500,7 +500,10 @@ begin
          try
            try
              FDownloadEngine.DownloadFile(Url, lStream);
-              if Assigned(Cache) and (lStream.Size > 0) then
+              if (lStream.Size = 0) then
+                Job.Cancel
+              else
+              if Assigned(Cache) then
                Cache.Add(MapO, Id, lStream);
            except
            end;