Arbeitsplatz Laufwerksbuchstaben auslesen

[Satty67]

Denke ist wohl das leidige Problem, wenn eine Remote-Laufwerk "mit Netzlaufwerk verbinden" an einen lokalen Laufwerksbuchstaben gekoppelt wird. Da wir die Verbindung (trotz Häkchen, bei Start neu verbinden) immer erst verbunden, wenn ein Programm versucht darauf zuzugreifen, was demnach beim ersten Versuch zu einem Fehler führen kann.

Nur NET USE als Autostart-Script funktioniert da, aber auch nur wenn zuvor die Verbindung mit /Delete zurückgesetzt wurde zu 100% (PS: Übrigens ähnlich, wenn mal LTP1 an eine Netzwerkdrucker bindet...)

Ein Versuch ist es Wert, zumindest sollte ein Zugriff vermutet werden und Laufwerk verbinden...

Delphi-Quellcode:

function GetDriveLetters: String;
var
  i : Integer;
begin
  Result := 'CDEFGHIJKLMNOPQRSTUVWXYZ';
  i := Length(Result);
  while i > 0 do begin
    if not DirectoryExists(Result[i]+':\') then
      Delete(Result,i,1);
    dec(i);
  end;
end;

Nicht installierte Diskettenlaufwerke (also A/B) bringen die alte Meldung Retry/Ignore/Cancel in nie dagewesener Verwirrtheit.