anchor.diff:        Inc(inptr);
         NewBGR.Blue:=inptr^;
         Inc(inptr);
  -      PDest^ := FPColorTofpgColor(NewBGR);
  +      PDest^ := RGBTripleTofpgColor(NewBGR);
         inc(PDest);
       end;
     end
  
positive.code:       NewBGR.Blue:=inptr^;
        NewBGR.Alpha:=inptr^;
        Inc(inptr);
        PDest^ := FPColorTofpgColor(NewBGR);
        inc(PDest);
      end;  
    end;
  
negative.code:   inptr: JSAMPLE_PTR;
    col : JDIMENSION;
   // pad : int;
    NewBGR: TRGBTriple;
    PDest: PLongWord;
  begin
    inptr := JSAMPLE_PTR(dest^.buffer^[0]);
  