高份求助----急!!!!!!!!!!!!!!1

swallowlove224 2003-10-17 02:05:52
在Server组件族中的TWordDocument中有这么一句:
tworddocument.Paragraphs.Item(26).Range.InsertFile(fname,fo,fo,fo,fo);
其中:fname:=extractfilepath(paramstr(0))+'database\filename.doc';
fo是olevariant.让fo:=false;

运行时出现以下错误:
project project1.exe raise exception class eoleexception with
message '类型不匹配'.
...全文
31 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
IORILI 2003-10-22
  • 打赏
  • 举报
回复
up
upingking 2003-10-21
  • 打赏
  • 举报
回复
fname是olevariant的吗?如不是请定义为olevariant或强制类型转换
tanqth 2003-10-21
  • 打赏
  • 举报
回复
up
flfljh 2003-10-21
  • 打赏
  • 举报
回复
up!!!
Alanwn 2003-10-17
  • 打赏
  • 举报
回复
up !
dickeybird888 2003-10-17
  • 打赏
  • 举报
回复
var
v1 : variant;
fname:string;
begin
v1 := EmptyParam;
fname:=extractfilepath(paramstr(0))+'database\filename.doc';
tworddocument.Paragraphs.Item(26).Range.InsertFile(fname,fo,fo,fo,fo);
end;
hthunter 2003-10-17
  • 打赏
  • 举报
回复
你的fname是什么类型,试一下将它强制转换成OleVariant看看:OleVariant(fname),fo也应该是OleVariant类型,一般用空值EmptyParam就可以了
Delphi_Li 2003-10-17
  • 打赏
  • 举报
回复
你把fo替换成EmptyParam试一试!!!
aiirii 2003-10-17
  • 打赏
  • 举报
回复
tworddocument??? 是什么意思??? 你还没有创建一个 实例???
Maple119 2003-10-17
  • 打赏
  • 举报
回复
我不知道.我帮你UP一下.

828

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 非技术区
社区管理员
  • 非技术区社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧