C语言辅导:VC数据库编程中的打印控制

VC数据库编程中的打印控制比较复杂，但它也给程序员的灵活搭卜性，而这种灵活性正是我们需要的。因为各行业、部门的报表一般都不太规整，特别是表头部分，二、三重嵌套的情况很常见。下面我们就开发中碰到的一些问题与同行们探讨。

Document/View框架之外的打印

熟悉VC的程序员都知道Microsoft 的AppWizard生成的应用程序框架中，可以选择免费的打印及打印预览功能，但前提是必须选择Document/View结构。然而我们的数据库应用中一般都不需要一个文档类来保存文档，因为数据库（源）就是我们的文档，数据一般是在一知凯穗个对话框或视中与用户交互，我或修改结果直接通过数据库引擎写回数据库中。我们的程序主框架要么是基于对话框的、要么是基于无文档类的单视（或多视）结构，在这种情况下，AppWizard 在打印控制部分并不能给我们任何帮助，只能自己负责完成打印控制。

总结起来，一次打印 *** 作要遵循以下步骤：

1.得到或生成打印设备场景，可通过显示打印对话框让用户选择打印机与纸张等设置，也可在程序中直接取系统缺省打印机设置，然后根据报表格式设置纸张大小和打印方向；

2.开始在该设备场景中的一次打印作业，实际打印报表内容，终止打印作业；

3.清除打印设备场景，完成本次打印 *** 作。

在下面的例子中，我们在一个对话框中让用户选择打印某个报表，没有显示打印设置对话框，而是直接取系统缺省打印机设置，然后根据报表格式设置纸张大小和打印方向。之所以这样做是因为各行业、部门的报表格式一般都是至上而下的统一格式。函数DoPreparePrintDC()、DoPrint()和DoClearPrintDC()分别对应上述的三个步骤：

BOOL CMyDialog::DoPreparePrintDC()

// 准备打印场景

{

＃defineFONTSIZE 14

// 获取打印机的设备属性

CPrintDialog dlgPrint( FALSE )

// 得到当前系统缺省打印机设置

if(!dlgPrint.GetDefaults()) return FALSE

LPDEVMODE pDM=dlgPrint.GetDevMode()

if(pDM==NULL) return FALSE

::GlobalUnlock(pDM)

// 联结打印DC，m—hDC是定义为HDC m—hDC的类成员变量

m—hDC=dlgPrint.CreatePrinterDC()

// m—DC是定义为CDC m—DC的类成员变量

if(!m—DC.Attach(m—hDC) return FALSE

// 设置打印标志

m—DC.m—bPrinting=TRUE

short cxInch=m—DC.GetDeviceCaps(LOGPIXELSX)

short cyInch=m—DC.GetDeviceCaps(LOGPIXELSY)

// 建立打印字体，m—fontPrint 是定义为CFont m_fontPrint的类成员变量

if(!m—fontPrint.CreateFont(MulDiv(FONTSIZE, －cyInch, 72),0,0,0, FW—NORMAL,0,0,0, GB2312—CHARSET, OUT—CHARACTER—PRECIS, CLIP—CHARACTER—PRECIS,DEFAULT—QUALITY, DEFAULT—PITCH|FF—DONTCARE, HFONTNAME)

return FALSE

return TRUE}

void CDlgDataPrint::DoClearPrintDC()

// 清除打印场景

{ m—fontPrint.DeleteObject()

m—DC.Detach()

::DeleteDC( m—hDC )}

void CDlgDataPrint::DoPrint()

// 实际打印输出

{ if(DoPreparePrintDC()==FALSE) return

// 开始一次打印作业孙誉

CString str

str.LoadString(AFX—IDS—APP—TITLE)

DOCINFO di

::ZeroMemory (＆di, sizeof (DOCINFO))

di.cbSize=sizeof (DOCINFO)

di.lpszDocName=str

m—DC.StartDoc(＆di)

m—DC.StartPage()

// 将打印字体选进设备场景

CFont＊ pOldFont=m—DC.SelectObject(＆m—fontPrint)

// 输出报表，建议用CDC::DrawText()函数便于控制打印范围

...

// 终止打印作业

m—DC.EndPage()

m—DC.EndDoc()

m—DC.SelectObject(pOldFont)

// 清除打印场景

DoClearPrintDC()}

表格问题

对格式固定或表头、表体比较复杂的情况，特别是有嵌套表格的情况下，我们认为先将打印结果以文本形式写入一临时文件，然后再对文件进行打印输出的方法会使事情简单一些。因为这样在程序中就可以只关心数据(表体)的输出，而表头则可以固定格式存入数据库。

但是，我们在对文本形式的报表进行打印输出时却发现一个有趣的现象，有时输出结果的相邻两行表格竖线不能对齐，而有时又可以。原来是 Windows 图形输出的问题，只要我们在建立打印字体时，字体的高度是偶数就可保证竖线对齐，如果是奇数则不能对齐。知道了原因，在建立打印字体时只需加入如下代码即可：

...

＃defineFONTSIZE 14

＃defineHFONTNAME ″微软雅黑″

// 建立打印字体，m—fontPrint是定义为CFont m—fontPrint的类成员变量

int nFontHeight=MulDiv(FONTSIZE,－cyInch, 72)

if(nFontHeight ％ 2) nFontHeight＋＋

if(!m—fontPrint.CreateFont(nFontHeight, 0, 0, 0, FW—NORMAL, 0, 0,0,GB2312—CHARSET, OUT—CHARACTER—PRECIS, CLIP—CHARACTER—PRECIS,DEFAULT—QUALITY, DEFAULT—PITCH | FF—DONTCARE, HFONTNAME))

return FALSE

...

还有一点小技巧，输出文本形式的报表时，对报表的横线只需要输出其正常高度的二分之一或三分之一，这样报表看起来更紧凑美观。这也是我们在前面建议用CDC::DrawText()进行绘制输出的原因。

如果您打印的TIF文件不清晰，您可以尝试以下几个方法：

1. 调整打印机设置。您可以尝试增加打印机设置中的打印质量或分辨率选项，从亩宽而提高打印品质。

2. 使用高质量的打印纸张。使用高质量的打印纸张可以提高打印品质，并产生更清晰的图像。

3. 检查TIF文件本身。有时，如果TIF文行歼件本身不是高质量的，则无论您如何调整打印机设置，打印出来的结果都可能不清晰。您可以尝试重新扫描或重新保存TIF文件，以确保其具有高质量的图像。

4. 尝试将TIF文件转换为其他格式。如果调整打印机设置和检查TIF文件本身都没有改善打印品质，您可以尝试将TIF文件转换为其他格式，例如JPEG或PDF。在转换文件的过程中，您可以选择更高质量的选项，以确保转换后的文件具有更清晰迅带亮的图像。

希望这些方法可以帮助您解决问题！

可以，你只要直接调用打印函岩罩乱数不就完了，不过不是什么文件都管打的，如果你不借助其他外部软件，大多数文件闷宴你是很难解析的，最简单的 txt bmp wmf容易处理，但类似excel的xls等就要依赖相关软件了，因为你无法解析这些文件，就算你懂粗档的格式，怎么绘制也是个麻烦事。。。

---