[roman]

Una pequeña observación:

En el código popuesto, la línea

Código Delphi [-]
imgStream.free;

tendría que ir después del finally:

Código Delphi [-]
     Graphic := imgGraphic;
   finally
     imgStream.free;
   end;

// Saludos