var
  iebmp: TIEBitmap;
begin
  iebmp := TIEBitmap.Create;
  iebmp.LoadFromFile(ASVGFile);
  iebmp.CopyToTBitmap(Bitmap, True);

  bmp1 := TIEBitmap.Create();
  bmp1.LoadFromFile( 'D:\Salzburg - Herbststimmung.svg' );
  bmp1.SaveToFile( 'D:\Salzburg - Herbststimmung.bmp' );
  bmp1.Free;


  io := TImageEnIO.Create(nil);
  try
    io.ImportFromFileSVG( 'D:\Salzburg - Herbststimmung.svg', AWidth, AHeight, True);
    io.SaveToFile('D:\Salzburg - Herbststimmung2.bmp');
  finally
    io.Free;
  end;

CodeSite.Send('ASVGFilePath', ASVGFilePath); // this shows the correct SVG file path
var ThisImageEnIO := TImageEnIO.Create(nil);
try
  try
    ThisImageEnIO.ImportFromFileSVG(ASVGFilePath, AWidth, AHeight, True);
    ThisImageEnIO.IEBitmap.Write('test.bmp'); 
    CodeSite.Send('ThisImageEnIO.IEBitmap.VclBitmap:', ThisImageEnIO.IEBitmap.VclBitmap); // This outputs a BLACK BITMAP!
    ThisImageEnIO.Bitmap.SaveToFile('test.bmp'); // this is not executed
    CodeSite.Send('ThisImageEnIO.Bitmap:', ThisImageEnIO.Bitmap); // this is not executed
  except
    CodeSite.Send('Exception'); // this is not executed
  end;
finally
  ThisImageEnIO.Free;
end;

ThisImageEnIO.ImportFromFileSVG(ASVGPath, AWidth, AHeight, True);
var bmp := TBitmap.Create;
try
  ThisImageEnIO.IEBitmap.CopyToTBitmap(bmp); // randomly creates a BLACK square with the same SVG file that worked previously
  CodeSite.Send('bmp', bmp); 
finally
  bmp.Free;
end;

uses
  {$IF CompilerVersion >= 36.0}  // Delphi 12 corresponds to version 36.0
  Vcl.Skia,
  {$ENDIF}
  System.SysUtils, Vcl.Forms, ...;  // other units