for correct load SVG from stream need adden to public TSVGGraphic in SVGIconImage.pas

[alex21mir]

class function TSVGGraphic.CanLoadFromStream(Stream: TStream): Boolean; var Header: Array[0..4] of AnsiChar; P: Int64; TstHdr:ansistring; begin P := Stream.Position; TstHdr:='<?xml'; try Result := (Stream.Read(Header[0], SizeOf(Header)) = SizeOf(Header)) and CompareMem(@Header[0], @TstHdr[1], SizeOf(Header)); finally Stream.Position := P; end; end;