获取环境变量
var
? str: string;
begin
? str := GetEnvironmentVariable('BDS');
? ShowMessage(str); { c:/program files/embarcadero/rad studio/7.0 }
? str := GetEnvironmentVariable('Delphi');
? ShowMessage(str); { c:/program files/embarcadero/rad studio/7.0 }
end;
總結
- 上一篇: vs2010 破解
- 下一篇: 2015《大数据》读者意见征集活动——幸