Entwickler-Ecke
Sonstiges (Delphi) - Alle Laufwerke auflisten, und freien Speicherplatz anzeigen
Salvador - Fr 31.01.03 22:33
Titel: Alle Laufwerke auflisten, und freien Speicherplatz anzeigen
Hallo,
Habe 2 Fragen:
1: Wie kann ich einfach auslesen, welche Laufwerke existieren (egal ob CD-Rom oder HD)
2: Wie kann ich zu jedem laufwerk abfragen, wieviel Speicherplatz zur Verfügung steht?
mfg!
Salvador
Sivar - Fr 31.01.03 22:56
Bei mir (Delphi 5) gibts die Funktion "DiskSize" - schau mal in der Delphi Hilfe ob du dazu was findest.
Gruß
Sivar
Salvador - Sa 01.02.03 02:06
Gut, das funktioniert....Aber wie lese ich aus welche Laufwerke existieren?
Brueggendiek - Sa 01.02.03 03:54
Hallo!
Quelltext
1:
2:
3:
4:
| function LaufwerkVorhanden(Laufwerk: Char): Boolean;
begin
Result := GetDriveType(Pchar(Laufwerk + ':\')) > DRIVE_NO_ROOT_DIR;
end; |
liefert die Angabe, ob ein Laufwerk existiert.
Das gilt auch für Netzlaufwerke.
Falls Du spezielle Laufwerke brauchst, schau in die OH zu GetDriveType - da werden die Rückgabewerte erklärt. Die obige Konstante ist von Delphi in der Unit Windows definiert.
Gruß
Dietmar Brüggendiek
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!