本文共 231 字，大约阅读时间需要 1 分钟。

很多时候，我们需要取得应用软件自身所在的文件夹名称，其实Delphi很简单，只需一行代码即可解决： 

procedure TFormMain.FormCreate(Sender: TObject);begin  showmessage(ExtractFilePath(ParamStr(0)));//可执行文件自身所在的目录文件夹有/  showmessage(ExtractFileDir(Application.Exename));//返回的路径没有/end;

转载地址：http://mnro.baihongyu.com/