Macht es bei mir auch nicht ... also noch nicht so schlimm ... aus irgendeinem Grund meint GetLastError dazu es sei ein "ungültiger Befehl" o.O
Allerdings scheint es mir eh nicht für Festplatten gemacht zu sein ... obwohl es komischer Weise bei den CD's och nicht geht.
Delphi-Quellcode:
Const IOCTL_CHANGER_GET_PRODUCT_DATA = $00304008;
Type _CHANGER_PRODUCT_DATA = packed Record
VendorID: packed Array[0..7] of Char;
ProductID: packed Array[0..15] of Char;
Revision: packed Array[0..3] of Char;
SerialNumber: packed Array[0..31] of Char;
DeviceType: Byte;
End;
If DeviceIoControl(Dh, IOCTL_CHANGER_GET_PRODUCT_DATA, nil, 0,
@ProductData, SizeOf(ProductData), W, nil) Then Begin
Also abgesehn davon sollte der Rest eigentlich was Anzeigen ... außer bei den Partitionen (die Unterpunkte der Physical Disks) ... da ist noch nicht viel implementiert ... kämpfe ja noch mit dem Rest -.-''
Ach ja, es gehrt übrigens sozusagen zu den beiden Threads:
Festplatte hat sich selber formatiert
Checken von offenen Files und doch kopieren