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;