Wie kann ich alle Netzwerkkarten mit Name Auslesen?

[maik1481]

Hei,

Ich habe Folgendes Problem.
Wie kann ich Netzwerkkarten Erkennen und Auslesen?

==================
Auslesen:
IP
Name
MAC
==================

Sorry: für das deutsch bin Norweger

[Helmi]

probier mal das:


http://www.swissdelphicenter.ch/de/showcode.php?id=1206

[maik1481]

OK danke für die Schnelle hilfe

PS: Schau da mal for bei www.norwayinfo.com

[maik1481]

war drauf auf der seite aber der Source Geht nicht.

[maik1481]

Habe es nun so Versucht aber es geht nicht.

Delphi-Quellcode:

uses
 Registry;


Procedure search_for_Network_adapter;
var Reg          : TRegistry;
    P            : Pointer;
    i            : Integer;

begin
    Reg := TRegistry.Create;
    try
      Reg.RootKey := HKEY_LOCAL_MACHINE;
      Reg.OpenKeyReadOnly('SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\');
      form1.ComboBox1.Items.Add(IntToStr(Reg.ReadBinaryData('Descriptions', P^, i)));
    finally
      Reg.CloseKey;
      Reg.Free;
    end;
end;


procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  search_for_Network_adapter;
end;

end.

[edit=Christian Seehase]Delphi-Tags korrigiert. Mfg, Christian Seehase[/edit]

[Christian Seehase]

Moin Maik,

ich hatte hier mal eine Demo zu dem Thema reingestellt.
Suchbegriffe GetAdpatersInfo GetPerAdapterInfo

[maik1481]

hei,
habe auf dem Link nichts gefunden.


giebt es denn für solche Aufgaben keine API?



PS: Sorry für das Deutsch aber bin Norweger.

Mfg
MaikP

[MagicAndre1981]

http://www.delphipraxis.net/internal...ct.php?t=24332

Da ist es für die MAC-Adresse, du musst halt pro Durchlauf noch die anderen Dinge abfragen, so schwer ist das nicht

[hoika]

Der unten stehende Link enthält den quellcode
für eien network traffic monitor,
der für jeden Adapter die gewünschten Infos anzeigt

http://delphi.about.com/od/fullcodep.../aa112903a.htm


Heiko