29

每当我使用 Delphi 的 Gethomepath 函数时,我都会不断收到 Shell Script Invocation Error。

此功能是否已被更新的功能取代?

4

1 回答 1

1

我终于找到了解决方法:blogs.embarcadero.com/ao/2011/10/04/39144#comment-7998

所以“S := ExtractFilePath(paramstr(0)); S := Copy(S, 1, length(S) - 14);” 完成工作。

请注意,S 的长度取决于您的应用程序标题。

于 2012-11-06T07:18:19.517 回答