Wndows外壳编程-调用"打开方式..."对话框来打开文档

本是古典何须时尚 2022-03-29 04:28 130阅读 0赞

例：  
在use中加入ShellAPI单元  
  
var  
FilePath:string;  
ShellReturn:integer;  
begin  
FilePath:=文件路径+文件名  
if FilePath<>'' then  
begin  
ShellReturn:=ShellExecute(Handle,PChar('Open'),PChar(filepath),nil,nil,1);  
if ShellReturn<=32 then  
case ShellReturn of  
0 : messagebox(handle,'系统资源不足，文件打开失败！','失败',MB\_OK+MB\_ICONSTOP);  
SE\_ERR\_ASSOCINCOMPLETE: messagebox(handle,'指定的文件名不符合windows规范','失败',MB\_OK+MB\_ICONERROR);  
SE\_ERR\_FNF : messagebox(handle,'指定的文件没有找到','失败',MB\_OK+MB\_ICONERROR);  
SE\_ERR\_OOM : messagebox(handle,'没有足够的内存完成操作，文件打开失败！','失败',MB\_OK+MB\_ICONSTOP);  
SE\_ERR\_PNF : messagebox(handle,'指定的目录没有发现','失败',MB\_OK+MB\_ICONERROR);  
\{当返回值表示该类型文件未在系统中注册时，调用系统'打开方式...'对话框\}  
SE\_ERR\_NOASSOC : winexec(PChar('rundll32 shell32,OpenAs\_RunDLL '+FilePath),SW\_SHOWDEFAULT);  
else  
messagebox(handle,'文件打开失败','失败',MB\_OK+MB\_ICONERROR);  
end;  
end;  
end;  
  
在这里：  
ShellExecute(Handle,PChar('Open'),PChar(filepath),nil,nil,1);用于直接打开已注册过的文件（也可以是网页，程序等）  
  
winexec(PChar('rundll32 shell32,OpenAs\_RunDLL '+FilePath),SW\_SHOWDEFAULT);用于调用系统的'打开方式...'对话框来打开该文件

发表评论取消回复

表情：

评论列表（有 0 条评论，130人围观）

还没有评论，来说两句吧...

相关阅读

相关 C++ 打开文件夹对话框-OPENFILENAME

效果图： ![81887ee177fd484c9e1caa58d2598fd9.png][] 实现方式 include<iostream> inc

逃离我推掉我的手/ 2023年09月26日 19:15/ 0 赞/ 59 阅读

相关 MFC打开文件对话框

\{ CString FilePathName; CFileDialog dlg(TRUE);///TRUE为OPEN对话框，FALSE为SAVE AS对话框 if

「爱情、让人受尽委屈。」/ 2022年08月21日 05:38/ 0 赞/ 155 阅读

相关 JS实现打开文件夹对话框

<%@ page contentType="text/html; charset=gb2312" language="java" import="java.sql.\" err

灰太狼/ 2022年08月09日 06:52/ 0 赞/ 334 阅读

相关 MFC打开文件对话框

CFileDialog类封装了Windows常用的文件对话框。常用的文件对话框提供了一种简单的与Windows标准相一致的文件打开和文件存盘对话框功能。 CFileDi

古城微笑少年丶/ 2022年08月02日 14:56/ 0 赞/ 182 阅读

相关 MFC 打开保存文件对话框

<table style="width:100%; table-layout:fixed"> <tbody> <tr> <td> <div>

桃扇骨/ 2022年07月03日 12:58/ 0 赞/ 82 阅读

相关 MFC 打开对话框，选择文件

// TODO: Add your control notification handler code here CFileDialog dlg( FA

拼搏现实的明天。/ 2022年04月06日 09:09/ 0 赞/ 221 阅读

相关 Wndows外壳编程-调用"打开方式..."对话框来打开文档

例：在use中加入ShellAPI单元 var FilePath:string; ShellReturn:integer; begin File

本是古典何须时尚/ 2022年03月29日 04:28/ 0 赞/ 131 阅读

相关文档库打开方式

这是今天的一个低级错误……记录一下吧。SharePoint 2007提供了很少的设置界面来设置是否在网页里面打开Office文件还是使用客户端Office打开。

ゝ一世哀愁。/ 2021年12月17日 00:45/ 0 赞/ 174 阅读

相关 iOS 调用第三方文档打开文件

背景：我们的应用下载了一个文件，并且需要展示这些文件，但是app本身不能打开的或者需要提供更多操作方式时，需要调用别的app来打开这个文件，在iOS 中提供

谁借莪１个温暖的怀抱￠/ 2021年10月01日 09:42/ 0 赞/ 408 阅读

相关来看看怎么通过a标签打开一个对话框

前言：也许这是一个很简单的动作，你似乎觉得这没什么，的确，在我完成了这个功能后，我觉得也很简单。 ![这里写图片描述][20150926162617758] 弹出框后面是一

小鱼儿/ 2021年05月10日 11:18/ 0 赞/ 425 阅读