ShellExecute 让我伤脑筋

Question

输入的文件名字带有绝对路径吗？如果没有，FileExists(edtXML.Text)和当前路径有关，所以结果不定

Answer 1

执行时参数完全相同，XML文件名含完整路径，结果就是时好时坏，请高手帮忙测试！

Answer 2

ShellExecute(Self.Handle,'Open', PChar(edtXML.Text), nil, nil, SW_MAXIMIZE);
试一试，不过效果应该是一样

Answer 3

注意。TEXT文件关联设置是否被修改

Answer 4

既然它有时没有反应，那执行函数ShellExecute肯定失败，检查一下返回值，这样才好判断哪里出问题.Ret:integer;Ret:=ShellExecute(....)if(Ret<=32)
{
  Memo1.Lines.Add('Error ='+SysErrorMessage(Ret));
}