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);