如何在一个线程中通过OLE的方式来调用WORD97(100分)

  • 主题发起人 主题发起人 xyw
  • 开始时间 开始时间
X

xyw

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在一个线程中通过OLE的方式来调用WORD97?
procedure TPrinterThread.Execute(Sender : TObject);

var
Word: Variant;



begin


Word := CreateOleObject('Word.Basic');

---->ERROR:未调用coInitialize
Word.FileNew('Normal');

Word.Insert('This is the first line'#13);

Word.Insert('This is the second line'#13);

Word.FileSaveAs('c:/temp/test.txt', 3);

end;


谢谢大家了!
 
uses ole2;//ole2在lib/delphi2目录下
try
coIniitialize;
word:=...
except
end;
 
给你发了一个。
 
为什么新建一个Word.Basic而不用Word.Application?
 
接受答案了.
 
后退
顶部