ShellExecute参数设置 ( 积分: 10 )

var<br>filename,fadd:string;<br>begin<br>　　　　filename:=ExtractFilePath(paramstr(0))+'myini.ini';<br> &nbsp; &nbsp; &nbsp; &nbsp;myinifile:=TInifile.Create(filename);<br> &nbsp; &nbsp; &nbsp; &nbsp;fadd:=myinifile.readstring<br> &nbsp; &nbsp; &nbsp; &nbsp;('Data Set','fileadd','');<br>//fadd为文件的路径<br> ShellExecute(handle,'open','fadd','-s','',SW_SHOWNORMAL);<br>end;<br><br>这样设执行不了文件文件，要如何设置呢，谁能告诉我吗？

var<br>filename,fadd:string;<br>begin<br>　　　　filename:=ExtractFilePath(paramstr(0))+'myini.ini';<br> &nbsp; &nbsp; &nbsp; &nbsp;myinifile:=TInifile.Create(filename);<br> &nbsp; &nbsp; &nbsp; &nbsp;fadd:=myinifile.readstring<br> &nbsp; &nbsp; &nbsp; &nbsp;('Data Set','fileadd','');<br>//fadd为文件的路径<br> ShellExecute(handle,'open','fadd','-s','',SW_SHOWNORMAL);<br>end;<br><br>这样设执行不了文件文件，要如何设置呢，谁能告诉我吗？

你是不是要用记事本打开ini文件呀,你可以用ShellExecute来执行记事本程序,然后把你的ini文件路径作为参数传递,看看可以吗?

第3个参数仅指明要执行的操作，不要带参数<br>如果有参数应该在第4个参数中列出

ShellExecute(handle,'open',pchar(fadd),0,0,SW_SHOW);

方法一<br> &nbsp; &nbsp; uses WinProcs; &nbsp; <br> &nbsp; ……<br> &nbsp; &nbsp; begin &nbsp; <br> &nbsp; &nbsp; &nbsp;WinExec(......); &nbsp; <br> &nbsp; &nbsp; …… <br> &nbsp; &nbsp; &nbsp;end. &nbsp; <br> &nbsp; &nbsp;和调用Pascal库函数没什么两样。 &nbsp; <br><br>方法二<br><br>用ShellExecute更好，在USES段加入SHELLAPI，使用时如：<br> &nbsp; 执行&quot;c:/myapp/myapp.exe&quot;参数为&quot;-s&quot;<br> &nbsp; ShellExecute(handle,'open','c:/myapp/myapp.exe','-s','',SW_SHOWNORMAL);<br> &nbsp; 第一个参数为父窗口句柄；<br> &nbsp; 第二个参数为打开方式（OPEN，PRINT两种）；<br> &nbsp; 第三个参数为执行文件全路径；<br> &nbsp; 第四个参数为执行文件参数；<br> &nbsp; 第五个参数为执行文件开始运行时的初始目录；<br> &nbsp; 第六个参数为为执行文件运行方式(SW_HIDE,SW_MAXIMIZE,SW_MINIMIZE,<br>SW_RESTORE,SW_SHOW,SW_SHOWDEFAULT,SW_SHOWMAXIMIZED,SW_SHOWMINIMIZED,<br>SW_SHOWMINNOACTIVE,SW_SHOWNA,SW_SHOWNOACTIVATE,SW_SHOWNORMAL);<br> &nbsp; 具体请看帮助。另外，如果为字符串参数，其中包含变量或运算的必需用PCHAR（）函数。

都说完了。哈俣。

http://www.delphibbs.com/keylife/iblog_show.asp?xid=16834