通过tapplication.exename特性可以获取当前进程的进程和文件名,要从中提取信息,可以调用下列函数:(假设路径和名称是c:\delphi\bin\project.exe):
extractfiledir()  c:\delphi\bin
extractfiledrive()  c:
extractfileext()  .exe
extractfilename()  project.exe
extractfilepath()  c:\delphi\bin