anchor.diff:  interface
   
   uses
  -  {$IFDEF WINDOWS}Windows,{$ELSE} LCLIntf, LCLType,{$ENDIF} Forms, Controls, Graphics, Types;
  +  {$IFDEF WINDOWS}Windows,{$ELSE} LCLIntf, LCLType,{$ENDIF} Forms, Controls, Graphics, Types, Classes;
   
   type
     TRectangleSide = (rsCenter, rsTop, rsLeft, rsBottom, rsRight, rsOutside);
  
positive.code:          Bitmap.Canvas.Handle, 0, 0, SRCCOPY);
  end;
  
  end.
  
negative.code: 
    function ScaleForDPI (const aValue : integer) : integer;
  
    procedure WriteText(ACanvas: TCanvas; const ARect: TRect; const AText: string; ATextAlignment: TAlignment);
  
  implementation
  
  uses
    SysUtils, Math {$IFDEF FPC},graphutil{$ENDIF};
  