读网卡的问题

我从csdn上拷下来一段
读网卡号的程序
但里面的一些类型我确在delphi中找不到
例如TLana_Enum。我只在windows sdk中找到有lana_enum
这个structure。但我怎么应用到delphi程序中呢。难道
是要我自己建一个TLana_Enum吗？请大家指点一下吧。procedure GetNetMacIDs(var MacIDs: string);
var Lana_Enum: TLana_Enum;
    RetCode: Word;
    i: Integer;
begin
  Lana_Enum := NetBiosLanaEnum;
  {enumerate lanas for WINNT }
  if Lana_Enum.Length=0 then Exit;
  for i:=0 to Lana_Enum.Length-1 do
  begin
    { for every lana found }
    RetCode := NetBiosReset(Lana_Enum.Lana[i]);
    { Reset lana for WINNT }
    if RetCode<>NRC_GOODRET then Exit;
    { Get MAC Address }
    MacIDs := MacIDs + Format('MacID %x = %s;', [Lana_Enum.Lana[i], GetMacAddress(i)]) + #13;
  end;
end;