VC中不用控件也没有提示,通过代码如何将"*.bmp"文件直接送打印机打印?

[happydingdang]

最好能给出代码,谢谢!!!!!!!!!!!!

[酒红绿叶]

http://www.vckbase.com/code/listcode.asp?mclsid=7&sclsid=705
VC中的图象打印问题

[老夏Max]

直接使用打印机DC，将BMP数据发送过去，我猜测是这么做的！

[happydingdang]

那是控件实现的，我要用代码直接实现啊！！！！！！！！！

[老夏Max]

http://www.vckbase.net/document/viewdoc/?id=1078

[happydingdang]

to :vcleaner
我试过了，但是不行

[lzzqqq]

CPrintDC吧？？？
就该先将bmp的东东BitBlt到PrintDC上，
再print就可以

[happydingdang]

我用了下买面的代码，编译通过了，但打印机不工作，
我自己新建一个工程，用菜单里的打印项，就可以打印

void Draw(HDC hDC,HBITMAP hBmp,int iX,int iY,double dScaleX=1.0,double dScaleY=1.0,int iWidth=0,int iLength=0)

{

HPALETTE hPal;

BITMAP bm;

BITMAPINFOHEADER bi;

LPBITMAPINFOHEADER lpbi;

DWORD dwLen;

HANDLE hDIB;

HANDLE handle;

HDC hDC1;

if(GetDeviceCaps(hDC,RASTERCAPS) & RC_PALETTE )

{

UINT nSize = sizeof(LOGPALETTE) + (sizeof(PALETTEENTRY) * 256);

LOGPALETTE *pLP = (LOGPALETTE *) new BYTE[nSize];

pLP->palVersion = 0x300;

pLP->palNumEntries =GetSystemPaletteEntries( hDC, 0, 255, pLP->palPalEntry );

hPal=CreatePalette(pLP );

delete[] pLP;

}

if (hPal==NULL) hPal = (HPALETTE) GetStockObject(DEFAULT_PALETTE);

::GetObject(hBmp,sizeof(bm),(LPSTR)&bm);

bi.biSize = sizeof(BITMAPINFOHEADER);

bi.biWidth = bm.bmWidth;

bi.biHeight = bm.bmHeight;

bi.biPlanes = 1;

bi.biBitCount = bm.bmPlanes * bm.bmBitsPixel;

bi.biCompression = BI_RGB;

bi.biSizeImage = 0;

bi.biXPelsPerMeter = 0;

bi.biYPelsPerMeter = 0;

bi.biClrUsed = 0;

bi.biClrImportant = 0;

int nColors = (1 << bi.biBitCount);

if( nColors > 256 )

nColors = 0;

dwLen = bi.biSize + nColors * sizeof(RGBQUAD);

hDC1 = ::GetDC(NULL);

hPal = SelectPalette(hDC1,hPal,FALSE);

RealizePalette(hDC1);

hDIB = GlobalAlloc(GMEM_FIXED,dwLen);

if (!hDIB)

{

SelectPalette(hDC1,hPal,FALSE);

::ReleaseDC(NULL,hDC1);

DeleteObject(hPal);

return ;

}

lpbi = (LPBITMAPINFOHEADER)hDIB;

*lpbi = bi;

::GetDIBits(hDC1, hBmp, 0L, (DWORD)bi.biHeight,

(LPBYTE)NULL, (LPBITMAPINFO)lpbi, (DWORD)DIB_RGB_COLORS);

bi = *lpbi;

if (bi.biSizeImage == 0)

bi.biSizeImage = ((((bi.biWidth * bi.biBitCount) + 31) & ~31) / 8)* bi.biHeight;

dwLen += bi.biSizeImage;

if (handle = GlobalReAlloc(hDIB, dwLen, GMEM_MOVEABLE))

hDIB = handle;

else

{

GlobalFree(hDIB);

SelectPalette(hDC1,hPal,FALSE);

::ReleaseDC(NULL,hDC1);

DeleteObject(hPal);

return ;

}

lpbi = (LPBITMAPINFOHEADER)hDIB;

BOOL bGotBits = GetDIBits( hDC1, hBmp,0L,(DWORD)bi.biHeight,(LPBYTE)lpbi+ (bi.biSize + nColors * sizeof(RGBQUAD)),

(LPBITMAPINFO)lpbi,(DWORD)DIB_RGB_COLORS);

if( !bGotBits )

{

GlobalFree(hDIB);

SelectPalette(hDC1,hPal,FALSE);

::ReleaseDC(NULL,hDC1);

DeleteObject(hPal);

return;

}

if(iWidth==0||iLength==0)

{

iWidth=lpbi->biWidth;

iLength=lpbi->biHeight;

iWidth=(int)(dScaleX*iWidth);

iLength=(int)(iLength*dScaleY);

}

StretchDIBits(hDC,iX,iY,iWidth,iLength,0,0,lpbi->biWidth,lpbi->biHeight,(LPBYTE)lpbi // address for bitmap bits

+ (bi.biSize + nColors * sizeof(RGBQUAD)),(LPBITMAPINFO)lpbi,DIB_RGB_COLORS,SRCCOPY);

SelectPalette(hDC1,hPal,FALSE);

::ReleaseDC(NULL,hDC1);

DeleteObject(hDIB);

DeleteObject(hPal);

}

[Jimmy_Xia]

关注中...

[chuanke]

ShellExecute(NULL,"print",m_filesDirAndName,NULL,NULL,SW_SHOWNORMAL);

[happydingdang]

to chuanke:
你的这句代码应该加在什么地方？

[jjdzyj]

用打印机语言，把图形通过算法扫描并翻译成打印机语言，不需要驱动，直接写并口完成。
我们就是这么做的。