WinExec（参数１，参数２）---对于变量的困惑！ ( 积分: 0 )

WinExec（参数１，参数２）<br>请问参数１能用变量吗？我测试了好像只能是常量字符串呀。有没有办法是变量呀。

WinExec（参数１，参数２）<br>请问参数１能用变量吗？我测试了好像只能是常量字符串呀。有没有办法是变量呀。

var<br> &nbsp;s: string;<br>begin<br> &nbsp;s := 'notepad.exe';<br> &nbsp;WinExec(PChar(s), SW_SHOWNORMAL);<br> &nbsp;s := 'calc.exe';<br> &nbsp;WinExec(PChar(s), SW_SHOWNORMAL);<br>end;

调用api都要用pchar，比较麻烦

filename_now:='C:/Documents and Settings/Administrator/桌面/INI/moive/222.txt';<br>或者filename_now:='C:/123.jpg';<br>ShellExecute(0,'open',pchar(filename_now),'','',SW_SHOWNORMAL);<br>或者ShellExecute(0,'open',pchar(filename_now),nil,nil,SW_SHOWNORMAL);<br><br>都不会打开???请高手指教！

uses<br> &nbsp;shellapi;<br>///<br>var<br>filename_now :string;<br>begin<br>filename_now:='C:/123.txt';<br>ShellExecute(0,'open',pchar(filename_now),'','',SW_SHOWNORMAL);<br>end;<br>没问题,可以打开!

procedure TForm1.Button1Click(Sender: TObject);<br>var filename_now:string;<br>begin<br>filename_now:=trim(extractfilepath(application.ExeName)+'moive/'+combobox1.text);<br>showmessage(filename_now);//显示为：c:/delphi/movie/123.txt<br>ShellExecute(handle,'open',PChar(filename_now),nil,nil,SW_SHOWMAXIMIZED);<br>其中combobox1中的值为123.txt(123.txt存放地址为c:/delphi/movie/123.txt)。请指教！<br><br>要是我直接<br>ShellExecute(handle,'open',PChar('c:/delphi/movie/123.txt'),nil,nil,SW_SHOWMAXIMIZED);<br>是可以打开的。但上面那样就不行了。为什么呢。搞不懂。怪事呀。<br><br>另外又试了这样也是行的：<br>filename_now：＝'c:/delphi/movie/123.txt';<br>ShellExecute(handle,'open',PChar(filename_now),nil,nil,SW_SHOWMAXIMIZED);

哪个高手知道，请吼一声啊。