anchor.diff:    Image: AllocRec;
     ImageSize: DWord;
     InfoSize: DWord;
  -{$endif}
  -begin
  -{$ifdef LCL}
  -  Canvas.StretchDraw(Rect(X, Y, W, H), Bitmap);
  -{$else}
  +begin
     if (Bitmap = nil) or (Bitmap.Handle = 0) then
       Exit;
     DC := Canvas.Handle;
  
positive.code:     AR.Free;
    end;
  
  {$ifdef LCL}
  {$else}
  var
    OldPal: HPalette;
    DC: HDC;
  
negative.code: {
  Version   11.3
  Copyright (c) 1995-2008 by L. David Baldwin
  Copyright (c) 2008-2012 by HtmlViewer Team
  
  Permission is hereby granted, free of charge, to any person obtaining a copy of
  this software and associated documentation files (the "Software"), to deal in
  