extractfilepath的简单介绍
delphi判断文件夹是否存在
var
AFilePath : string;
begin
AFilePath := ExtractFilePath(ParamStr(0)); //取当前程序运行目录
AFilePath := AFilePath + 'c'; //加上C文件夹
if DirectoryExists(AFilePath) then
ShowMessage('目录存在')
else ShowMessage('目录不存在');
end;
在Delphi下，怎样在DLL里读取ini文件的内容
和DLL没有关系，你编译DLL的代码里面读取ini就好了
var
ini_path,ini_filename:string;
ini_file:Tinifile;
begin
ini_path:=extractfilepath(application.ExeName); //路径
ini_filename:=ini_path+'xxx.ini';//路径+文件民称
ini_file:=Tinifile.Create(ini_filename);
//写入
ini_file.writestring('节点','关键字',变量或字符串值);
ini_file.writeinteger('节点','关键字',变量或整型值);
ini_file.writebool('节点','关键字',变量或True或False);
// 读取
ini_file.Readstring('节点','关键字',缺省值);
//删除关键字
ini_file.DeleteKey('节点','关键字');//关键字删除
ini_file.EraseSection('节点');// 节点删除
//节点操作：
inifile.readsection('节点',TStrings变量);
//可将指定小节中的所有关键字名读取至一个字符串列表变量中；
inifile.readsections(TStrings变量);//可将INI文件中所有小节名读取至一个字符串列表变量中去。
inifile.readsectionvalues('节点',TStrings变量);
//可将INI文件中指定小节的所有行（包括关键字、=、值）读取至一个字符串列表变量中去。
//释放
inifile.distory;或inifile.free;
end;
delphi如何获得指定路径文件的文件名?
//delphi 获取文件所在路径
ExtractFileDrive ：返回完整文件名中的驱动器，如"C:"
ExtractFilePath：返回完整文件名中的路径，最后带“/”，如"C:/test/"
ExtractFileDir：返回完整文件名中的路径，最后不带“/” ,如"C:/test"
ExtractFileName:返回完整文件名中的文件名称 (带扩展名)，如"mytest.doc"
ExtractFileExt 返回完整文件名中的文件扩展名（带.），如".doc"
ExtractRelativePath ： 返回相对路径，定义如下：
function ExtractRelativePath(const BaseName, DestName: string): string;
使用测试下如：
SysUtils.ExtractRelativePath('C:/test','C:/Test/TestRelativePath'):返回TestRelativePath
SysUtils.ExtractRelativePath('C:/Test/TestRelativePath','C:/test'):返回'../TestRelativePath'
SysUtils.ExtractRelativePath('C:/Test/TestRelativePath/','C:/test'):返回'../../TestRelativePath'
ExtractShortPathName :返回短文件名，即8+3，文件名长八位，扩展名为3号，为保持DOS系统兼容而存在
若想获取的文件名不带路径,可用:
ChangeFileExt(TIdAttachment(Msg.MessageParts.Items[intIndex]).Filename,''); 函数将扩展名改掉即可。
delphi里的当前路径是什么意思 到底是什么路径 就是ExtractFilePath(ParamStr(0))表示什么路径 还有
ExtractFileDir：根据参数内容（绝对文件名）获取该文件所在的路径（不含最后面的那个斜杠）
getcurrentdir：获取当前路径，但是注意，此项值在调用OPENDIALOG或者SAVEDIALOG之后会被动态改变。
delphi里的当前路径是什么意思：是指EXE可执行文件所在路径
ExtractFilePath(ParamStr(0))表示什么路径：表示该可执行文件所在路径（完整路径）
delphi中当前路径的上一层 怎么表示：请参照以下函数
//以下代码纯手工输入，在DELPHI7下测试通过
//在USES里增加引用如下单元：StrUtils
function getParentDirectory: String;
var
cPath : String;
begin
cPath := ExtractFilePath(ParamStr(0));
if RightStr(cPath, 1) = '\' then
begin
cPath := LeftStr(cPath, Length(cPath) - 1);
end;
while RightStr(cPath, 1) '\' do
begin
cPath := LeftStr(cPath, Length(cPath) - 1);
end;
Result := cPath;
end;
如果有不明白的地方，请继续提问。乐于帮你解答，现在做DELPHI的人越来越少啦。
Delphi获取相对路径的文件名（不带路径）
ExtractFileName(文件完整路径 含文件名)
例：
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
showmessage(ExtractFileName(OpenDialog1.FileName));
end;
end;
以上例子为：当点击Button1时，弹出选择文件后，显示所选的文件名称（含扩展名）。