方法一：不帶\GetCurrentDir方法二：帶\ExtractFilePath(Application.ExeName);方法三：帶\ExtractFilePath(paramstr(0)) edit1.Text:=ParamStr(0);//自己全路徑c:/555/qq.exe,可用于控制臺 edit1.text:=ExpandFileName(ParamStr(0)); //獲取本程序的完整路徑 c:/qq/2.exe edit2.text:=ExtractFileDir(ParamStr(0)); //獲取本程序的路徑 c:/qq edit3.text:=application.Exename; //獲取本程序的完整路徑 c:/qq/2.exe,和第1個一樣 edit4.text:=ExtractFilename(Application.Exename); //獲得文件名2.exeExpandFileName() 返回文件的全路徑(含驅動器、路徑) ExtractFileExt() 從文件名中抽取擴展名 ExtractFileName() 從文件名中抽取不含路徑的文件名 ExtractFilePath() 從文件名中抽取路徑名 ExtractFileDir() 從文件名中抽取目錄名 ExtractFileDrive() 從文件名中抽取驅動器名 ChangeFileExt() 改變文件的擴展名 ExpandUNCFileName() 返回含有網絡驅動器的文件全路徑 ExtractRelativePath() 從文件名中抽取相對路徑信息 ExtractShortPathName() 把文件名轉化為DOS的8·3格式 MatchesMask() 檢查文件是否與指定的文件名格式匹配

總結

以上是生活随笔為你收集整理的delphi 获取当前路径的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。