StretchDIBits

function StretchDIBits(

  DC: HDC;

  DestX: Integer;

  DestY: Integer;

  DestWidth: Integer;

  DestHeight: Integer;

  SrcX: Integer;

  SrcY: Integer;

  SrcWidth: Integer;

  SrcHeight: Integer;

  Bits: Pointer;

  var BitsInfo: TBitmapInfo;

  Usage: UINT;

  Rop: DWORD

):Integer;