TPNGImage in TGPImage umwandeln

[Uwe Raabe]

Der IStream-Parameter von FromStream ist als const deklariert. Das setzt die Referenzzählung außer Kraft. Eine lokale IStream-Variable schafft hier Abhilfe.

Delphi-Quellcode:

       stream := TStreamAdapter.Create(ImageStream);

       // TGPImage von Stream erzeugen
       Image := TGPImage.FromStream(stream);