Explorar o código

fcl-image: canvas AllocateResources: propagate exceptions to be able to properly handle (e.g. log) them

git-svn-id: trunk@43335 -
ondrej %!s(int64=5) %!d(string=hai) anos
pai
achega
13641eb1cf
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  1. 2 0
      packages/fcl-image/src/fphelper.inc

+ 2 - 0
packages/fcl-image/src/fphelper.inc

@@ -114,6 +114,8 @@ begin
   except
     FCanvas := nil;
     FAllocated := False;
+
+    raise;
   end;
 end;