@Himitsu
bittes das Statemant nicht persönlich nehmen.
Es sollte auf keinen Fall irgendeine Art von Anmache sein!
Falls es doch so aufgefasst wurde bitte ich um Entschuldigung.
Zitat:
Was sind denn diese "irgendwelche Pseudobezeichnungen" gewesen?
Ich hatte es wie vorgeschlagen auf
CreateFile(PCHAR(Format gekürzt und mal laufen lassen.
Mit dem Ergebnis das statt 'Physicaldrive0' irgend etwas da Stand, bei dein anderen Einträgen sah es nicht besser aus. Also die Sache mit dem PCHAR wieder verworfen. Ich schau mal Morgen nach, woran es genau lag.
[EDIT]
Ich habe es heute noch mal geändert und siehe da es bringt das gewünschte Ergebnis, keine Ahnung woran es gestern lag.[/EDIT]
@devidespe
Zeile 367? Bitte mal eine Zeile höher, also 366 einen Breakpoint setzen und schauen welchen Wert
'Length(DR.PartitionData)' hat. Eventuell in 365 folgendes einfügen:
if Length(DR.PartitionData) > 0 then
Bis bald.
Alter Mann