PrintDbGrideh 打印数据

PrintDbGrideh1.BeforeGridText.Clear;//添加
PrintDbGrideh1.BeforeGridText.Add( '订单 ');
PrintDBGridEh1.PageFooter.CenterText.Text:='第 &[Page] 页/共 &[Pages] 页';
PrinterPreview.Orientation:= poLandscape;           //横向打印:需要引用 Printers 单元
PrintDBGridEh1.Options :=[pghFitGridToPageWidth];  //将所有列缩放为一页
PrintDBGridEh1.Preview;                             //打印预览

 

posted @ 2016-08-31 16:19  aBung  阅读(734)  评论(0编辑  收藏  举报