// Функции для вывода DIB:
StretchDIBits
SetDIBitsToDevice

// Для DDB:
StretchBlt
BitBlt

// Тест DIB:     
// Iterration:      1000    10000

BitBlt.              431    4171
SetDIBitsToDevice    413    4184

// Вывод: SetDIBitsToDevice чуть бытрее BitBlt, но это не обо то впечатляет.

////////////////////////////////////////////////////////////////////////////
// Тест DDB:     
// Iterration:      1000    10000

BitBlt.              12      286
SetDIBitsToDevice    430    4136

// Вывод: BitBlt - уделывает всех. 8) (Быстрее в 15 раз (!))

with SrcRect, ImageData do
        if Windows.StretchDIBits(DC, DstRect.Left, DstRect.Top,
          DstRect.Right - DstRect.Left, DstRect.Bottom - DstRect.Top, Left,
          Top, Right - Left, Bottom - Top, Bits, BitmapInfo, DIB_RGB_COLORS, SRCCOPY) <> Height then //say hello to http://support.microsoft.com/kb/269585
        begin
          b := TBitmap.Create;
          ConvertDataToBitmap(ImageData, b);
          StretchBlt(DC, DstRect.Left, DstRect.Top, DstRect.Right - DstRect.Left,
                    DstRect.Bottom - DstRect.Top, b.Canvas.Handle, 0, 0, Width,
                    Height, SRCCOPY);
          b.Free;
        end;