在Delphi中,可以使用以下方法來獲取系統路徑:
uses
SysUtils;
var
systemPath: string;
begin
systemPath := SysUtils.GetEnvironmentVariable('windir'); // 獲取 Windows 系統文件夾路徑
// 或者
systemPath := SysUtils.GetEnvironmentVariable('systemroot'); // 獲取 Windows 系統根文件夾路徑
end;
uses
ShellAPI;
var
systemPath: array[0..MAX_PATH] of Char;
begin
if SHGetSpecialFolderPath(0, systemPath, CSIDL_WINDOWS, False) then // 獲取 Windows 系統文件夾路徑
ShowMessage(systemPath);
// 或者
if SHGetSpecialFolderPath(0, systemPath, CSIDL_SYSTEM, False) then // 獲取 Windows 系統根文件夾路徑
ShowMessage(systemPath);
end;
請注意,以上代碼示例中的路徑常量和函數可能需要根據您的實際需求進行調整。