@Guido Eisenbeis
Die
Unit jwaWinIOCTL ist nicht mehr erforderlich.
@all
Ich habe die ganze Sache ein wenig überarbeitet.
Festplatten die eine GPT haben werden nun auch unterstützt.
Die Funktion
LBASizeToGB ist nun komplett neu, da die bisherige
bei meinem 1GB USB-Stick 1048GB angezeigt hatte
.
Da ich per PN angemeckert wurde (
Jim Panse) habe ich das ganze ein wenig
gründlicher getestet(Windows XP, Windows 7; Delphi 7, Delphi 2009).
Noch ein kleiner Hinweis, ohne
WMI geht garnichts!
VG
"Alter Mann", den Sinn einer PN haben Sie offensichtlich nicht kapiert
== Daher hier der Text der PN an den alten Mann ===
Hallo "Alter Mann",
vielen Dank für den Sourcecode von DI!
Haben Sie die EXE schon mal auf einem anderen als Ihrem Rechner gestartet?
poDesigned mit Left bei 1308?
Ihre erste auf der
DP hochgeladene Version von PartInfo.zip ermittelte bei mir immerhin noch 226 GB, die aktuelle Version von PartInfo.zip kommt auf 0 GB.
Allerdings zeigt DI absolut nichts weiter als diese sowieso falschen GB-Werte an.
Also keine bunten Panels - wie von Guido Eisenbeis gewünscht
Ätzenderweise kompiliert mein Delphi7 Ihren Quelltext nahezu problemlos und zeigt mir dann - zwei Meter rechts des Bildschirmrandes - Null GB an ;-(
Soweit meine aktuellen Erfahrungen mit Ihrem PartInfo.zip.
Natürlich schaut man einem geschenkten Gaul angeblich nicht ins Maul
MfG
"Jim Panse"