ＭＡＣアドレスを取得するために、検索して下記のコードで出来ることが分かりました。
ネットワークに接続しているときは取得できるのですが、接続していないときは
取得できません。
ネットワークに未接続でも取得できる方法はありますでしょうか。

function TfrmForm1.GetMAC_Address: String;
var
  Ncb: TNCB;
  RetCode: Integer;
  lenum: TLanaEnum;
  i: integer;
  zStr: String;
begin
  Result := '';

  // ローカルのMACアドレスを取得する
  // NCBENUM 命令を実行
  ZeroMemory(@Ncb, SizeOf(NCB));
  Ncb.ncb_command := Char(NCBENUM);
  Ncb.ncb_buffer := @lenum;
  Ncb.ncb_length := SizeOf(lenum);
  Netbios(@Ncb);
  //取得した最初のNICの分
  i := 0;
  // NICのリセット
  ZeroMemory(@Ncb, SizeOf(NCB));
  Ncb.ncb_command := Char(NCBRESET);
  Ncb.ncb_lana_num := lenum.lana[i];
  Netbios(@Ncb);
  //NCBASTAT 命令を実行
  ZeroMemory(@Ncb, SizeOf(NCB));
  Ncb.ncb_command := Char(NCBASTAT);
  Ncb.ncb_lana_num := lenum.lana[i];
  Ncb.ncb_callname := '* ';
  Ncb.ncb_buffer := @Adapter;
  Ncb.ncb_length := SizeOf(Adapter);
  RetCode := Byte(Netbios(@Ncb));
  //
  zStr := '';
  if RetCode = 0 then begin
    zStr := (Format('%.02X-%.02X-%.02X-%.02X-%.02X-%.02X', [
    Byte(Adapter.adapt.adapter_address[0]),
    Byte(Adapter.adapt.adapter_address[1]),
    Byte(Adapter.adapt.adapter_address[2]),
    Byte(Adapter.adapt.adapter_address[3]),
    Byte(Adapter.adapt.adapter_address[4]),
    Byte(Adapter.adapt.adapter_address[5])]));
    Result := zStr;
  end;
end;