高性能Windows图形开发库WinG(2)
2013-05-30 01:39
导读:(BITMAPINFO far *)Info,pBits); WinGBitmap = SelectBitmap(WinGDC,WinGBitmap); HPALETTE OldPalette = ::SelectPalette(dc.m-hDC,hpalApp,FALSE); ::RealizePalette(dc.m-hDC); HPALETTE WinGPalette = WinGCreat
(BITMAPINFO far *)&Info,&pBits);
WinGBitmap =
SelectBitmap(WinGDC,WinGBitmap);
HPALETTE OldPalette =
::SelectPalette(dc.m-hDC,hpalApp,FALSE);
::RealizePalette(dc.m-hDC);
HPALETTE WinGPalette =
WinGCreateHalftonePalette();
HPALETTE OldWinGPalette =
::SelectPalette(WinGDC,WinGPalette,FALSE);
::RealizePalette(WinGDC);
::StretchDIBits(WinGDC,0,0,DibWidth(
pCurrentDIB),DibHeight(pCurrentDIB),
0,0,DibWidth(pCurrentDIB),DibHeight(
pCurrentDIB),DibPtr(pCurrentDIB),
DibInfo(pCurrentDIB),
DIB-RGB-COLORS,SRCCOPY);
::SelectPalette(WinGDC,OldWinGPalette,FALSE);
::DeleteObject(WinGPalette);
int Width = DibWidth(pCurrentDIB);
int Height = DibHeight(pCurrentDIB);
WinGStretchBlt(dc.m-hDC,0,0,Width,
Height, WinGDC,0,0,
DibWidth(pCurrentDIB),
DibHeight(pCurrentDIB));
::SelectPalette(dc.m-hDC,OldPalette,FALSE);
::SelectPalette(WinGDC,OldPalette,FALSE);
::DeleteObject(SelectBitmap(WinGDC,WinGBitmap));
::DeleteDC(WinGDC);
}
注意,在Windows 95下执行WinG安装程序Setup.exe,然后就可执行Wing32.exe。
用Visual C++ 2.0编译源程序,必须将WinG图形库Wing31.lib连接(link)到可执行文件Wing32.exe中(见文中所述)。