首部 function GetCurrentDir: string; $[SysUtils.pas

功能 返回当前操作目录

说明 [注意]调用文件对话框会改变当前操作目录

参考 function System.GetDir

例子 Edit1.Text := GetCurrentDir;