一个简单问题!!!!!答对者有分!!!!!!!!!!!!!!!!

WJY2003 2003-08-19 01:55:19
我点按钮让它打开后台一个相对应的.pdf文件.
add:=extractfiledir(application.ExeName)+'文件\'+'22'+'.pdf';
或者我把这一个变量后面的东西直接入在下面的那个地方
shellexecute(handle,'open',add,nil,nil,sw_shownormal);
运行时一直提示有错.就在这个变量这儿.这儿不能有变量??????
帮我!!!!!!!如何解决.
...全文
48 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
li_zhifu 2003-08-19
  • 打赏
  • 举报
回复
1、同意DWGZ,extractfiledir改成ExtractFilePath,因为ExtractFilePath所返回的是一个包含'\'的完整路径;
2、确认一下add是什么类型,如果是PChar的就对了,如果是String的,则要
  shellexecute(handle,'open',PChar(add),nil,nil,sw_shownormal);
HappyLifqd 2003-08-19
  • 打赏
  • 举报
回复
首先将'文件\'变为'\文件\',然后将ShellExecute那一句改为如下形式:
ShellExecute(Handle,'open',PChar(Add),nil,nil,SW_SHOWNOMAL);
这样我认为应该就能解决问题了。
WJY2003 2003-08-19
  • 打赏
  • 举报
回复
这也不行呀(楼上)
shellexecute(handle,'open',add,nil,nil,sw_shownormal);
一直提示add这儿出错????????????????????/
DWGZ 2003-08-19
  • 打赏
  • 举报
回复
extractfiledir改成ExtractFilePath
WJY2003 2003-08-19
  • 打赏
  • 举报
回复
楼上说的不行吧???还有其它办法吗?
pluto74 2003-08-19
  • 打赏
  • 举报
回复
呵呵,将'文件\'变为'\文件\'。

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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