在Delphi中,可以使用GetCurrentDir函数来获取当前路径。GetCurrentDir函数的定义如下:
function GetCurrentDir: string;
使用方法如下:
var currentPath: string; begin currentPath := GetCurrentDir; ShowMessage(‘当前路径:’ + currentPath); end;
以上代码会弹出一个消息框显示当前路径。