起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 756|回复: 1

代码设置横向打印、纸张大小、边距等

[复制链接]
发表于 2008-1-8 13:44:00 | 显示全部楼层 |阅读模式
//横向打印
DataGrid.Exporter.PageInfo.Orientation := TPrinterOrientation.poLandscape;
//纵向打印
DataGrid.Exporter.PageInfo.Orientation := TPrinterOrientation.poPortrait;


//左边距
DataGrid.Exporter.PageInfo.MarginLeft := AMarginLeft;
回复

使用道具 举报

 楼主| 发表于 2008-2-16 09:53:22 | 显示全部楼层
使用下面两个方法可以自适应打印,不过页边框很大,楼主可以看一下效果。
DataGrid.PrintPortrait;   //竖着打,自动适应宽度
DataGrid.PrintLandscape;   //横着打,自动适应宽度

如果要预览打印,其实是所见即所得的打印,需要设置DataChart的长宽。
  DataGrid.Align:=TAlign.alCustom;
    DataGrid.Width:=700;
    DataGrid.Height:=1000;
    DataGrid.Preview;
    DataGrid.Align:=TAlign.alClient;
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2024-3-29 07:58 , Processed in 0.038907 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表