Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Festplattengröße auslesen (https://www.delphipraxis.net/66976-festplattengroesse-auslesen.html)

dbdeath74 7. Apr 2006 11:35


Festplattengröße auslesen
 
Hallo,

ich versuche die Festplattengröße eines PC auszulesen.
Die wirkliche Festplatte würde mich interessieren, Partitionsgrößen würde zur Not auch gehen.

Ich habe den Code von Luckie hier versucht:

http://www.delphipraxis.net/viewtopi...3570&view=next

Aber leider bekomme ich bei hdevice ein INVALID_HANDLE_VALUE.
Da ich die zugegebenermaßen den Aufruf nicht 100% verstehe ist mir nicht ganz klar was da schief läuft.

Hat vielleicht jemand eine Idee warum ich diesen INVALID_HANDLE_VALUE bekomme oder kennt eine andere Möglichkeit an die Festplattengröße zu kommen?

Bin über jeden Tip dankbar.

Gruß dbdeath74

Bolt Thrower 7. Apr 2006 13:13

Re: Festplattengröße auslesen
 
Hi dbdeath74,

vielleicht hilft Dir der folgende Link von den Schweizern ja weiter: Den freien Speicherplatz, die Größe einer Festplatte/Diskette ermitteln.

Grüße,

Bolt Thrower

Daniel G 7. Apr 2006 13:18

Re: Festplattengröße auslesen
 
Wie nutzt du die Funktion denn?

dbdeath74 7. Apr 2006 13:32

Re: Festplattengröße auslesen
 
@ Bolt: ja das habe ich inzwischen auch gefunden, aber das gibt ja leider nur die Partitionsgröße zurück.
Ist zwar schonmal was, aber nicht optimal (ich brauche die Festplatten).

@Daniel: ich habe zu testzwecken genau den code von luckie genommen, also noch gar nicht bei mir eingebaut, sondern in einer neuen andwendung ausprobiert.
also einfach die JwaWinIoctl eingebunden und den code von luckie rein.
könnte den jetzt nochmal posten, aber hatte ihn zum testen eh nur kopiert.

Gruß dbdeath74

Daniel G 7. Apr 2006 13:44

Re: Festplattengröße auslesen
 
Und du nutzt ihn auch unter einem NT-ähnlichen System, ja?
Merkwürdig...

dbdeath74 7. Apr 2006 13:52

Re: Festplattengröße auslesen
 
ich hab den Fehler gefunden:

in der Zeile
Device := '\\.\PhysicalDrive'+IntToStr(i);

waren die 2 Backslashes weg oO :wall: :wall:

ist mir jetzt zwar unbegreiflich da ich den code nur kopiert habe ....

bitte vielmals um entschuldigung *g :duck:

Gruß dbdeath74

Daniel G 7. Apr 2006 14:01

Re: Festplattengröße auslesen
 
:mrgreen:

Macht doch nichts, passiert jedem Mal...

himitsu 20. Jul 2006 17:14

Re: Festplattengröße auslesen
 
Zitat:

Zitat von dbdeath74
in der Zeile
Device := '\\.\PhysicalDrive'+IntToStr(i);

waren die 2 Backslashes weg oO :wall: :wall:

ist mir jetzt zwar unbegreiflich da ich den code nur kopiert habe ....

das lag eventuell doch nicht an dir ... hatte vor kurzem aucxh einige Codes (einer sogar direkt bei MS) entdeckt, da stand auch nur '.\PhysicalDriveX' drin.


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz