VC数据库编程中的打印控制
2003-12-4加入  来自赛迪网  作者李佑民  1条评论  点击2287
       
  VC数据库编程中的打印控制比较复杂,但它也给程序员最大的灵活性,而这种灵活性正是我们需要的。因为各行业、部门的报表一般都不太规整,特别是表头部分,二、三重嵌套的情况很常见。下面我们就开发中碰到的一些问题与同行们探讨。 

  Document/View框架之外的打印 

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

  总结起来,一次打印操作要遵循以下步骤: 

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

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

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

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

  BOOL CMyDialog::DoPreparePrintDC() 

  // 准备打印场景 

  { 

   #define  FONTSIZE 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 图形输出的问题,只要我们在建立打印字体时,字体的高度是偶数就可保证竖线对齐,如果是奇数则不能对齐。知道了原因,在建立打印字体时只需加入如下代码即可: 

  ... 

  #define  FONTSIZE 14 

  #define  HFONTNAME ″宋体″ 

  // 建立打印字体,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()进行绘制输出的原因。 
Posted on 2005-11-11 14:31 艾凡赫 阅读(728) 评论(0)  编辑 收藏 引用 所属分类: ADO编程技术

只有注册用户登录后才能发表评论。
网站导航: 博客园   IT新闻   BlogJava   博问   Chat2DB   管理