JCLのJclSysInfoで環境変数を取得する

JclSysInfoのGetEnvironmentVars関数を使うと、すべての環境変数を取得できます。

function GetEnvironmentVars(const Vars: TStrings): Boolean; overload;

引数に環境変数を格納するTStringsを渡します。
成功したときはTrue、失敗したときはFalseを返します。

uses JclSysInfo;

var
  S: TStringList;
begin
  S := TStringList.Create;
  GetEnvironmentVars(S);

JclSysInfoのGetEnvironmentVar関数を使うと、指定した変数名の値を取得できます。

function GetEnvironmentVar(const Name: string; out Value: string): Boolean; overload;

引数に変数名Nameと、値を格納するValueを渡します。
成功したときはTrue、失敗したときはFalseを返します。

uses JclSysInfo;

var
  CommandLine: string;
begin
  JclSysInfo.GetEnvironmentVar('COMSPEC', CommandLine);

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください