关于网卡的判断 delphi

如果一台机上有多个网卡，怎么才能知道它现在正在使用那一个网卡。（用代码）

还有没有其它情况？ 小弟我刚接触，还望大家多多指教。 我用的是delphi编程

就算知道了， 怎么告诉你呢？ 通过网卡名称还是mac地址？

我觉得获得使用的网卡有难度的，

我的菜鸟办法：

1. http://www.ip138.com/ 取得自己的联网ip

2. 用winexec调cmd /k ipconfig /all > c:\xx.txt

3.用pos函数检测第一步取的ip 然后提出对应网卡的名称，mac

type TaPInAddr = array [0..10] of PInAddr; PaPInAddr = ^TaPInAddr; var phe : PHostEnt; pptr : PaPInAddr; Buffer : array [0..63] of char; I : Integer; GInitData : TWSADATA; flag:dword; begin WSAStartup($101, GInitData); FINET_AssignedIP :=''; GetHostName(Buffer, SizeOf(Buffer)); phe :=GetHostByName(buffer); if phe = nil then Exit; pptr := PaPInAddr(Phe^.h_addr_list); I := 0; while pptr^[I] <> nil do begin FINET_AssignedIP:=StrPas(inet_ntoa(pptr^[I]^)); Inc(I); end; WSACleanup; end;