Delphi GetCurrentDir 获取当前文件夹

本文整理自网络，侵删。

 //获取当前文件夹 GetCurrentDir
var
dir: string;
begin
dir := GetCurrentDir;
ShowMessage(dir); //C:\Documents and Settings\wy\My Documents\RAD Studio\Projects
end;

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

function GetCurrentDir: string;
begin
GetDir(0, Result);
end;
 

相关阅读 >>

Delphi 查看字符串在不同编码(ascii、unicode、utf7、utf8、default、bigendianunicode)下的 hex

Delphi 如何确定活动桌面是否已启用

unigui js操作Delphi控件赋值

Delphi webbrowser通过遍历id查找元素是否存在

Delphi分割字符串的函数--extractstrings

Delphi twebbrowser打开paypal出错

tthread ―― 线程类详解

Delphi 蠕虫下载者源代码

Delphi android 安卓系统 关闭打开(显示隐藏)输入法

Delphi 把pf8bit位图变换成pf24bit位图

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

转载请注明出处：木庄网络博客 » Delphi GetCurrentDir 获取当前文件夹