delphi怎么设置WORD的页边距？

Question

想用WORD来打印  可是两边空的地方太多了
请问怎么设置页边距啊？

Answer 1

顺便问一下 怎么设置 WORD某一行的字体大小？

Answer 2

[code=Delphi(Pascal)]
uses comobj;var word,document:olevariant;beginword:=createoleobject('word.application');
document:=word.documents;
document.open('c:\1.doc');
word.ActiveDocument.pagesetup.topmargin:=111;  //上边距topmargin 下bottommargin 左leftmargin 右 right.....
word.selection.HomeKey(wdline,1);   //开始选择范围
word.Selection.MoveDown(wdline,3);
word.selection.endkey(wdline,wdExtend );
word.Selection.Font.Size:=13;      //结束范围设置,第四行文字改变。
word.ActiveDocument.saveas('c:\2.doc');
document.close;
word.quit;
word:=unassigned;end; code]