* Ondrejs fix for resetting stream is now redundant

git-svn-id: trunk@33467 -

packages/fcl-image/src/fpimage.inc

@@ -123,9 +123,7 @@ var r : integer;
     reader : TFPCustomImageReader;
     msg : string;
     d : TIHData;
-    startPos: Int64;
 begin
-  startPos := str.Position;
   with ImageHandlers do
     try
       r := count-1;
@@ -141,7 +139,6 @@ begin
             try
               if CheckContents (str) then
                 try
-                  str.Position := startPos;
                   FStream := str;
                   FImage := self;
                   InternalRead (str, self);
@@ -152,7 +149,6 @@ begin
                 end;
             finally
               Free;
-              str.Position := startPos;
             end;
           end;
         dec (r);