在程序里如何对word文档的编辑?

[032031121]

如:文字的居中,字体的大小,字体的字形等等请大家帮帮忙提供点这方面的资料

[踢踏]

var
Ran: Variant; //定义Word文档的范围
WordApp,Doc: Variant; //WordApplication对象和WordDocument对象

//创建Word.Application
WordApp:=CreateOleObject('Word.Application');

sBarText(0,'正在添加内容，请稍候······');
ProgressBar1.Position:=40;
Application.ProcessMessages;

Doc:=WordApp.Documents.Add;
Doc.Range.Delete;
Doc.Range.InsertAfter(sListMain.Text);
//定义字体为12,粗体
Ran:=Doc.Range;
Ran.Font.Size:=12;
Ran.Bold:=true;

//字体为16,粗体,中心对齐
Ran:=Doc.Paragraphs.Item(1).Range;
Ran.Font.Size:=16;
Ran.Bold:=true;
Ran.ParagraphFormat.Alignment:=wdAlignParagraphCenter;

//各个表名的字体为14,粗体
for i:=0 to iTableMax-1 do
Doc.Paragraphs.Item(iRan[i,0]-1).Range.Font.Size:=14;

sBarText(0,'正在排版内容，请稍候······');
ProgressBar1.Position:=60;
Application.ProcessMessages;

//把一个范围内的数据转化为表格,表格识别符为制表符(#9)
for i:=iTableMax-1 downto 0 do
begin
Ran:=Doc.Range(Doc.Paragraphs.Item(iRan[i,0]).Range.Start,
Doc.Paragraphs.Item(iRan[i,1]).Range.End);
Ran.ConvertToTable(#9,iRan[i,1]-iRan[i,0],8);
end;

..............