Home » Tipps & Tricks » Netzwerk/Internet » Netzwerk » Netzlaufwerke mit Dialog verbinden
Netzlaufwerke mit Dialog verbinden
Die API-Funktion WNetConnectionDialog ruft den Verbindungs-Dialog für Netzwerklaufwerke auf. Die Funktion gibt NO_ERROR zurück, falls eine Verbindung hergetsellt werden konnte und $FFFFFFFF falls der Benutzer den Dialog manuell schließt. Weitere Rückgabewerte sind in der PSDK unter dem Stichwort „WNetConnectionDialog“.
procedure TForm1.Button1Click(Sender: TObject); const CANCEL_DIALOG = $FFFFFFFF; begin case WNetConnectionDialog(Handle, RESOURCETYPE_DISK) of NO_ERROR: Showmessage('OK'); CANCEL_DIALOG: Showmessage('Abbruch'); else RaiseLastOSError; end; end;
Zum Trennen des Netzlaufwerkes per Dialog rufen Sie die Funktion WNetDisconnectDialog auf:
procedure TForm1.Button2Click(Sender: TObject); begin if WNetDisconnectDialog(Handle, RESOURCETYPE_DISK)NO_ERROR then RaiseLastOSError; end;
Hinweis: RaiseLastOSError ist erst ab Delphi 6 verfügbar. Programmierer, die mit älteren Versionen arbeiten müssen an dieser Stelle RaiseLastWin32Error verwenden.Alternative Funktionen finden Sie in der PSDk unter dem Stichwort „WNetConnectionDialog1“ und „WNetDisconnectDialog1“ dokumentiert.