TBGRASVGOriginalDiff

type TBGRASVGOriginalDiff = class(TBGRAOriginalDiff)

protected

  FContentVersionBefore: Integer;

  FContentVersionAfter: Integer;

  FSvgStreamBefore: TMemoryStream;

  FSvgStreamAfter: TMemoryStream;

  FDpiBefore: single;

  FDpiAfter: single;

public

  constructor Create();

  procedure ComputeDiff();

  procedure Apply(); override;

  procedure Unapply(); override;

  function CanAppend(); override;

  procedure Append(); override;

  function IsIdentity; override;

  destructor Destroy; override;

end;

TBGRASVGOriginalDiff

TBGRAOriginalDiff

TObject