|
Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
Delphi 11 Alexandria
|
4. Jul 2002, 14:58
Folgende Funktion testet die Laufwerke
Code:
function DriveExists(DriveByte: Byte): Boolean;
begin
Result := GetLogicalDrives and (1 shl DriveByte) <> 0;
end;
A = 0
B = 1
C = 2
...
Daniel W.
Ich bin nicht zurück, ich tue nur so
|