delphi 获得父目录--指定级父目录
来源:互联网 发布:大数据对未来的影响 编辑:程序博客网 时间:2024/06/05 00:35
获得指定级父目录 关键字:父目录
function get_dir_parent(dir:string;n:integer):string; //n为几级父目录
var
st:string;
i:integer;
begin
st:=GetCurrentDir;
SetCurrentDir(dir);
for i:=1 to n do
begin
ChDir('..');
end;
result:=GetCurrentDir;
SetCurrentDir(st);//恢复最初
end;
调用
procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(get_dir_parent((ExtractFilePath(ParamStr(0))),1));
end;
原作者:闫磊 发表时间:2003-8-9var
st:string;
i:integer;
begin
st:=GetCurrentDir;
SetCurrentDir(dir);
for i:=1 to n do
begin
ChDir('..');
end;
result:=GetCurrentDir;
SetCurrentDir(st);//恢复最初
end;
调用
procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(get_dir_parent((ExtractFilePath(ParamStr(0))),1));
end;
- delphi 获得父目录--指定级父目录
- C# 获得父目录,指定级父目录
- delphi 获得当前目录 与 获得主程序 目录
- c 获得指定目录的文件名
- delphi 删除指定目录 下 指定日期之前所有文件
- delphi 查找指定目录,指定扩展名的所有文件名
- delphi遍历指定目录下指定类型文件的函数
- 获得指定目录下的所有文件的方法!
- cocos2d-x 获得系统语言、指定资源目录
- 遍历指定目录获得文件名或者文件夹名称,或者两则都要
- C++ 获得指定目录下的所有文件名称
- 获取指定目录下的所有文件(delphi)
- Delphi 获取指定目录下文件的大小
- ./ 当前目录../ 父级目录/ 根目录
- [Delphi] 计算目录大小的函数,获得目录文件列表,计算文件的大小
- 获得指定文件目录晓得文件名和目录名,以及过滤
- Delphi 计算指定目录下所有文件的大小(遍历文件夹所有文件及目录)
- GetCurrentDirectory获得当前目录
- 番茄花园 Ghost XP SP2 V 3.1
- find 命令常用参数
- 经典“一句话”处世的20条法则[转载]
- ALV GRID参考文档(十三)
- 灰暗心情
- delphi 获得父目录--指定级父目录
- Amazon的SimpleDB
- 光心
- 使用Cross-Page Postback(跨页面提交)在页面间传递数据
- Instant Messaging java 概要(第二章)01
- C/C++ 编码规范(适用C51)详解
- 计算机类论文在哪里投稿?
- Instant Messaging java(第二章)02
- 周星驰经典电影对白