Entwickler-Ecke

Open Source Units - MAC-Adresse von LAN-Teilnehmern bestimmen


Narses - Mo 10.08.09 15:54
Titel: MAC-Adresse von LAN-Teilnehmern bestimmen
Moin!

Mit den Funktionen aus dieser Unit lässt sich die MAC-Adresse von Teilnehmern im LAN bestimmen (die Maschine muss per ARP-Request erreichbar sein):

Delphi-Quelltext
1:
2:
function GetMACstr(const IPv4: in_addr; out MACAddr: Stringconst Delimiter: Char = '-'): Boolean; overload;
function GetMACstr(const Hostname: Stringout MACAddr: Stringconst Delimiter: Char = '-'): Boolean; overload;

Anwendung z.B. so:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
  var
    MAC: String;
begin
  if GetMACstr(edIP.Text,MAC) then
    Log.Lines.Add(MAC)
  else
    Log.Lines.Add('Fehler bei der Adressermittlung!');
Im Anhang die Unit und ein Demoprogramm mit Quelltext. Es wird noch diese Ping-Unit [https://www.entwickler-ecke.de/topic_ICMPEchoAPI+Ping+WrapperUnit_53259.html] benötigt.

cu
Narses