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: String; const Delimiter: Char = '-'): Boolean; overload; function GetMACstr(const Hostname: String; out MACAddr: String; const 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