【搞定】如何代码控制打印**

ccseasy · 发表于 2007-7-24 10:03:07

如何代码控制打印方式，比如原来是横向打印，现在需要纵向打印。以及左边距？？？？？

ccseasy · 发表于 2007-7-24 10:24:21

ccseasy · 发表于 2007-7-24 11:00:10

atiger · 发表于 2007-7-24 11:02:30

是表格文档还是DataGrid？

http://bbs.justep.com/forum.php?mod=viewthread&tid=11430

ccseasy · 发表于 2007-7-24 11:13:29

datagrid

ccseasy · 发表于 2007-7-24 11:25:19

左边距？？？？？
怎么设置用代码？？

fpj · 发表于 2007-7-24 11:38:14

楼主，请参考：
procedure TCT1.PrintSetupClick(Sender: TObject);
begin
  datachart1.PageSetup;// 打印设置
end;

procedure TCT1.PriviewClick(Sender: TObject);
begin
  datachart1.Preview; //预览
end;

procedure TCT1.PrintPortraitClick(Sender: TObject);
begin
  datachart1.PrintOrientation(Business.Forms.TPrinterOrientation.poPortrait);  //纵向打印
end;

procedure TCT1.PrintLandscapeClick(Sender: TObject);
begin
  datachart1.PrintOrientation(Business.Forms.TPrinterOrientation.poLandscape); //横向打印
end;

ccseasy · 发表于 2007-7-24 11:54:44

不是要你写的东西，你写的可以控制左边距吗？？？

fpj · 发表于 2007-7-24 12:07:36

在打印的时候可以直接进行边距设置。
再就是在做表格文档时，要适应的调整表格文档的边距。

fpj · 发表于 2007-7-24 12:12:38

在打印的时候可以直接进行边距设置。
再就是在做表格文档时，要适应的调整表格文档的边距。

		自动登录	找回密码
密码			立即注册