【结贴】数据网格打印浏览时能否设成横向的？**

ccseasy

数据网格打印浏览时能否设成横向的？

ccseasy

就是打印时是横向打印

ccseasy

数据网格打印浏览时表格高度如何调整？现在行高太小，字体不能完全显示。如图

ccseasy

怎么没人回呀？

jiahaiminghr

http://bbs.justep.com/forum.php? ... ;highlight=datagrid

http://bbs.justep.com/forum.php? ... ;highlight=datagrid

ccseasy

请问你这个写在了什么事件下呀？我想写在打印浏览（起步自带的打印浏览）下面怎么写呀？
procedure TCT1.PrintLandscapeClick(Sender: TObject);
begin
  datachart1.PrintOrientation(Business.Forms.TPrinterOrientation.poLandscape); //横向打印
end;

jiahaiminghr

楼上代码是控制DataChart打印的，不是datagrid
请参考http://bbs.justep.com/forum.php? ... ;highlight=datagrid
14楼代码。
写在哪里都行，只要保证打印前执行就可以了。

ccseasy

我想写在打印浏览或者打印的下面，我还要判断一下用户点了哪个按钮例如：
if TBizDataSetAction(Sender).ID=BizActnConsts.ActionDataSetSave then

可是打印的和添加修改删除的不是一个，如果我写在打印下面怎么写呢？明白了吗？

jiahaiminghr

楼主，这句代码只要执行一次就可以了，不用每次打印都执行。

ccseasy

目前这句话我不知道写在什么地方，
DataGrid.Exporter.PageInfo.Orientation := TPrinterOrientation.poLandscape;