int CXLuaCImpl::StretchBitmap(lua_State* luaState)

{

	XL_BITMAP_HANDLE hXLBitmap = NULL;

	if (XLUE_CheckBitmap(luaState, 2, &hXLBitmap))

	{

		int nWidth = lua_tointeger(luaState,3);

		int nHeight = lua_tointeger(luaState,4);

		CImage oldImage;

		CImage newImage;

		HBITMAP hBitmap = TransparentImage(XLGP_ConvertXLBitmapToDIB(hXLBitmap, 32));

		oldImage.Attach(hBitmap);

		if(!newImage.CreateEx(nWidth, nHeight, 24, BI_RGB))

		{

			oldImage.Detach();

			return 0;

		}

		int nPreMode = ::SetStretchBltMode(newImage.GetDC(),  HALFTONE);

		newImage.ReleaseDC();

		oldImage.Draw(newImage.GetDC(), 0, 0, nWidth, nHeight, 0, 0, oldImage.GetWidth(), oldImage.GetHeight());

		newImage.ReleaseDC();

		::SetBrushOrgEx(newImage.GetDC(), 0, 0, NULL);

		newImage.ReleaseDC();

		::SetStretchBltMode(newImage.GetDC(), nPreMode);

		newImage.ReleaseDC();

		oldImage.Detach();

		hXLBitmap = XLGP_ConvertDDBToXLBitmap(CClientDC(NULL), newImage.Detach(), XLGRAPHIC_CT_ARGB32);

		XLUE_PushBitmap(luaState,hXLBitmap);

		return 1;

	}

	return 0;

}