Delphi SetCurrentDir 设置当前文件夹路径


本文整理自网络,侵删。

 //设置当前文件夹 SetCurrentDir; ChDir; SetCurrentDirectory
var
dir: string;
begin
dir := 'c:\temp';
if SetCurrentDir(dir) then
ShowMessage(GetCurrentDir); //c:\temp

//或者
ChDir(dir); //无返回值

//也可以使用API:
SetCurrentDirectory(PChar(Dir)); //返回 Boolean
end;

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

function SetCurrentDir(const Dir: string): Boolean;
begin
{$IFDEF MSWINDOWS}
Result := SetCurrentDirectory(PChar(Dir));
{$ENDIF}
{$IFDEF LINUX}
Result := __chdir(PChar(Dir)) = 0;
{$ENDIF}
end;

相关阅读 >>

Delphi 悬浮窗口 浮动窗口 迅雷下载浮动窗口的实现

Delphi checklistbox 用法

Delphi实现阿里云印刷文字识别_身份证识别

Delphi实现tedit控件的外观只有一条下划线

Delphi 判断两个时间差是否在一个指定范围内

Delphi 获取当前进程的父进程

Delphi 禁止改变窗口大小和移动窗口

Delphi 在rxrichedit中插入图片的完美解决方法

adoquery 实现获取数据库所有表名

Delphi整理二(object pascal语言)

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...