delphi中如何显示office中的word?

[zjs_sql]

delphi中如何显示office中的word?

[hufuwen]

使用Servers下的控件（在Delphi5中）

[mengbo]

调用OLE对象也可以

[mengbo]

try
if VarIsEmpty(WordApp) then
WordApp := CreateOleObject('word.Application');
。。。。。。
except
Application.MessageBox(pchar('Ms Word 无法启动,数据转入终止!'),pchar('注意'),mb_ok);
Abort;
end;

[mengbo]

wordapp: variant;

[catfather46]

OleContainer1.createObjectFromFile(FileName);//这种形式调用，激活是就在OleContainer1中
OleContainer1.createLinktoFile(filename);//激活时调用word，与原程序分属两个窗口
OleContainer1.DoVerb(ovShow);//激活

[m_cen]

error :
WordApp := CreateOleObject('word.basic');

[m_cen]

error! :

WordApp := CreateOleObject('word.basic');
WordApp.visible := true;
......