Guten Abend,
Zitat von
Alter Mann:
danke für die "Berichtigungen"
Wenn ich mit meinen bescheidenen Kenntnissen sonst nicht helfen kann.
Zitat von
Alter Mann:
Zeile 85/86: Mit 'wbemConnectFlagUseMaxWait' habe ich sooo meine Erfahrungen;
Die 0 hatte ich in einem anderen Source gesehen. Luckie hat mir heute
dort gezeigt, wie ich die WbemScripting_TLB importieren muss. Nun habe ich die MS
WMI Scripting V1.2 Library (Version 1.2) importiert. Damit erzeugt die Variable wbemConnectFlagUseMaxWait keine Fehlermeldung mehr und wird mit 128 ($80) angegeben. Das Ergebnis ist jedoch gleich geblieben. Die Variable Propval zeigt die String, wie sie in den DeviceClasses in der Registry stehen. ZB '
IDE\CDROMMATSHITA**'.
Leider kann ich Dir dabei nicht weiterhelfen, weil meine Englischkenntnisse noch schlechter als meine Delphikenntnisse sind.
Ich habe mir in dem Zusammenhang von
http://www.online-admin.com/download.html die Demo StorageInfo heruntergeladen. Diese Demo hat die gewünschten Laufwerksinformationen angezeigt. Die Demo enthält auch die Source ohne die
WMI Componente, welche es als Sharewareversion (58 US$) zum Download gibt. Das Archiv enthält die vorcompilierten Komponenten.
Aus Neugier habe ich es dann unter Win98SE getestet. Die unter XP compilierte EXE ergab einen Fehler 'ungültige Variable'. Dann wollte ich es mit Delphi 3 Prof compilieren. Dort habe ich MS
WMI Scripting V1.1 Library (Version 1.1) importiert und es gab wieder den Fehler mit dem unbekannten wbemConnectFlagUseMaxWait. CNT : Integer mochte D3 natürlich auch nicht. Und nachdem ich LongInt draus gemacht habe, hat sich der Compiler irgenwohin verlaufen.
Sieht so aus, als würde es wbemConnectFlagUseMaxWait erst in der MS
WMI Scripting V1.2 Library geben.