怎么控制WORD行数,以及每行的字数 (50分)

怎么样在delphi程序中起动word时使用设置好的行数及每行字数!谢谢!

在WORD中录制一个新宏，看VB源吗码是怎么写的。

我不想写什么宏,只要在程序中控制。

你录制好宏后，参考它的宏代码，适当转换就可以转换程Delphi调用的代码了。
这是使用Office这个大COM的最佳方案！
实验一下吧。

如果只是仅仅单纯设置每页行数和每行字数的话可以用
NewWordApp(WordApp, WordDoc,true);//新建一个文档
worddoc.PageSetup.LinesPage := 每页行数;
worddoc.PageSetup.CharsLine := 每行字数;

其中NewWordApp函数如下:
procedure NewWordApp(WrdApp: TWordApplication; var WrdDoc : TWordDocument; WrdVisible : boolean);
var
Template, NewTemplate, DocType, DocVisible : OleVariant;
begin
Template := EmptyParam;
NewTemplate := EmptyParam;
DocType := EmptyParam;
DocVisible := EmptyParam;
WrdApp.Connect;
WrdApp.Visible := WrdVisible;
WrdDoc.ConnectTo(WrdApp.Documents.Add(Template,NewTemplate,DocType,DocVisible));
end;

但是如果你的每页行数和每行字数太少的话,界面上其实很难看,还要调整页面的纸张
或者(左右上下的)边距.这个要看你的具体需求,然后进行调整了.

yzhshi的意思是充分利用office的宏录制功能,看看office自己是怎么写的,然后改成
delphi代码.自己玩玩看吧.

谢谢几位,我准备试这两种方法。

多人接受答案了。

mark