Schau dir mal die
Unit JclSysInfo in der
JCL an.
Dort findest du innerhalb der
function GetMacAddresses(const Machine: string; const Addresses: TStrings): Integer;
folgendes Code Stückchen:
Delphi-Quellcode:
GetMacAddressesNetBios;
if (Result <= 0) and (Machine = '') then
GetMacAddressesSnmp;
Wie man sieht wird zuerst versucht die MAC-Addresse(n) über NetBios zu lesen.
Wenn das nicht klappt (vielleicht weil NetBios über
TCP/
IP deaktiviert ist) dann wird es über
Snmp versucht.
Ich kann Dir die JCL nur wärmstens empfehlen; das spart viel Arbeit und man bekommt sauberen und gut getesteten Code.