Namen von Netzwerken anzeigen

[Ouou]

Moinsn DP´ler,

ich beschäftige mich gerade mit dem auslesen von Netzwerken. Hab mich schon durchs Forum gekämpft und rumgebastelt, dass es jetzt so funktioniert wie ich wollte.

Soweit habe ich es bis jetzt:

Delphi-Quellcode:

function DriveType(DriveByte: Byte): String;
begin
  case GetDriveType(PChar(Chr(DriveByte + Ord('A')) + ':\')) of

        DRIVE_UNKNOWN: Result     := 'Unbekannt';
        DRIVE_NO_ROOT_DIR: Result := 'Laufwerk existiert nicht';
        DRIVE_REMOVABLE: Result   := 'Wechselmedium';
        DRIVE_FIXED: Result       := 'Festplatte';
        DRIVE_REMOTE: Result      := 'Netzlaufwerk';
        DRIVE_CDROM: Result       := 'CD-ROM/DVD';
        DRIVE_RAMDISK: Result     := 'RAM Disk';
  else
        Result := 'Laufwerkstyp?';
  end;
end;

Nur habe ich noch ein Problem und zwar benötige ich die Namen von den Netzlaufwerken... Ich komme einfach nicht drauf wie ich des anstellen soll.

Hoffe ihr habt ein paar Ratschläge wie ich mein Problem lösen kann...

Danke schon mal

MFG Ouou

[inherited]

Hast du es schon mit GetVolumeInformation aus der kernel32.dll probiert?

Siehe hier: http://social.msdn.microsoft.com/For...5-adaabb462b89
Und hier: http://msdn.microsoft.com/en-us/library/aa364993(VS.85).aspx