关于shellexecute的使用(50分)

[]我想利用shellexecute，使用写字板打开文本文件，使用ACDSee打开位图文件，<br>请告诉我怎莫写代码？谢谢！

shellapi

shellexecute的用法，可以查看相关的书籍。——API的使用。

ShellExecute 查找与指定文件关联在一起的程序的文件名 <br>返回值 <br>Long，非零表示成功，零表示失败。 <br>参数 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 类型及说明 <br>hwnd Long， &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;指定一个窗口的句柄，有时候，windows程序有必要<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;在创 建自己的主窗口前显示一个消息框 <br>lpOperation String， &nbsp; 指定字串“open”来打开lpFlie文档，或指定<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; “Print”来打印它 <br>lpFile String， &nbsp; &nbsp; &nbsp; &nbsp; 想用关联程序打印或打开一个程序名或文件名 <br>lpParameters String， &nbsp; 如lpszFlie是可执行文件，则这个字串包含传递给<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 执行程序的参数 <br>lpDirectory String， &nbsp; &nbsp; 想使用的完整路径 <br>nShowCmd Long， &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;定义了如何显示启动程序的常数值。

查Delphi代的帮助即可。<br>给你个小例子：<br>if OpenDialog.Execute then<br>begin<br>&nbsp; ShellExecute(Handle,'Open',pchar(OpenDialog.FileName),'','',SW_SHOWNORMAL);<br>end;<br>

if Not OpenDialog1.Execute then Exit;<br>shellexecute(handle,'Open',Pchar(OpenDialog1.FileName),'','',SW_Show);<br>不过一定要uses shellapi

谢谢了，50分拿给你们分！[]