anchor.diff:  
   end;
   
  +
   { UNIT IMPLEMENTATION }
   { CONSTRUCT }
   constructor TAggImage.Construct;
  
positive.code: { LINETO }
  procedure TAgg2D.LineTo(const x ,y : double );
  begin
  // m_path.line_to(x+0.5 ,y+0.5 );
   m_path.line_to(x ,y );
  
  end;
  
negative.code:  mtx  : trans_affine;
   str_ : PChar;
  
   tat : trans_affine_translation;
   tar : trans_affine_rotation;
  
    tr : conv_transform;
    charlen: int;
    char_id: int32u;
    First: Boolean;
  
  begin
   if Str='' then exit;
  
   dx:=0.0;
   dy:=0.0;
  
  