如何通过delphi 控制excel 的页边距？

[ajige]

现在我在delphi中想把表格导入到excel中，然后进行打印。
用到的语句是这样的：
ExcelApp := CreateOleObject( 'Excel.Application' );
我想把表格正好设置到一张A4纸上，这样方便打印。
请问各位大侠，
如何在程序中设置excel的页边距呢？如何将表格在页面上居中显示呢？

[浩南_哥]

页面水平居中：
ExcelApp.ActiveSheet.PageSetup.CenterHorizontally :=True;
j.页面垂直居中：
ExcelApp.ActiveSheet.PageSetup.CenterVertically :=True;

这些东西录制个宏看下代码就有了

[lyhoo163]

with MainFrm.ExcelWorksheet1.PageSetup do
begin
HeaderMargin := 0.5/0.035;
HeaderMargin := 0.2/0.035;
TopMargin := 0.5/0.035;
BottomMargin := 0.5/0.035;
LeftMargin := 0.5/0.035;
RightMargin := 0.5/0.035;
end;

[Atlantis]

2楼说的对，知道这个方法，以后你不知道怎么处理的，都可以录制个宏，看看宏里面怎么写的就行了