delphi 得到执行程序的当前所在完整路径

本文整理自网络，侵删。

 在Delphi SysUtils 单元中有 ExtractFileDir 与 ExtractFilePath两个类似的函数, 两个函数有以下的区别: 

ExtractFilePath 传回值的最後一个字元是反斜杠“\”。

ShowMessage(ExtractFileDir(Application.Exename)); // 返回值为 c:\temp

ShowMessage(ExtractFilePath(Application.Exename)); // 返回值为 c:\temp\

相同点： 如果执行文件在根目录下(如：C:\SAMPLE.EXE)的话, 两者的传回值相同， 且最后一个字符都是“\”。

===============================================================================

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.exe
 

相关阅读 >>

Delphi winapi: getwindowtext - 获取窗口标题

Delphi 获取android id 号

Delphi application.messagebox 详解

Delphi 常用控件属性

Delphi 录音制作 wav 文件

Delphi 在vcl中显示一个非激活状态的窗口

Delphi-改进获取文件md5 hash方法

Delphi 查看 dll 的输出函数列表

Delphi 从字符串中提取单词、从字符串中提取汉字的函数

Delphi最全面的dbgrid点击标题实现排序

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 得到执行程序的当前所在完整路径