![]() |
Re: Sektoren auslesen
Also ich konnte das Problem jetzt isolieren:
Delphi-Quellcode:
Wenn ich als DriveLetter 'C' übergeb müsste
function RawOpenDrive(DriveLetter: Char): TRawDrive;
var num,h: Cardinal; begin h:=0; FillChar(Result, SizeOf(TRawDrive), 0); Handle := CreateFile(PChar('\\.\' + DriveLetter + ':'), GENERIC_READ or GENERIC_WRITE, FILE_SHARE_READ or FILE_SHARE_WRITE, nil, OPEN_EXISTING, 0, 0); Result.Handle := Handle; if Result.Handle = INVALID_HANDLE_VALUE then RaiseLastOSError; // Laufwerk für andere sperren if not DeviceIoControl(h, FSCTL_LOCK_VOLUME, nil, 0, nil, 0, num, nil) then RaiseLastOSError; { Disk-Geometry ermitteln. Vor allem ist das Feld BytesPerSector wichtig, da nur vielfache Bytes gelesen werden können. Ist also BytesPerSector z.B: 512 und man will nur 1 Byte lesen, muss man 512 Bytes lesen. } if not DeviceIoControl(Handle,IOCTL_DISK_GET_DRIVE_GEOMETRY, nil, 0,@Result.DiskGeometry,SizeOf(TDiskGeometry), num, nil) then RaiseLastOSError; end; es ja theoretisch klappen, nur kommt dann Zitat:
Delphi-Quellcode:
Was ich nicht verstehe, da ja dieses Handle weiter oben geprüft und annerkannt wird... :wiejetzt:
if not DeviceIoControl(Handle,IOCTL_DISK_GET_DRIVE_GEOMETRY, nil, 0,@Result.DiskGeometry,SizeOf(TDiskGeometry), num, nil) then
RaiseLastOSError; |
Re: Sektoren auslesen
Moin Nice,
welche Variable enthält denn nun das Handle? h oder handle? Das geht aus Deinem Code nämlich nicht genau hervor. Am Besten setzt Du mal einen Breakpoint auf die DeviceIOControl Zeile und prüfst mal den Inhalt der dort als Handle übergebenen Variablen. |
Re: Sektoren auslesen
Hallo,
ich hätte da noch eine Frage zu CreateFile:
Delphi-Quellcode:
Laut PSDK ist '\\?\' der UNC Präfix für einen Filenamen, ist dann auch '\\.\' zulässig?
Handle := CreateFile(PChar('\\.\' + DriveLetter + ':'),
Ausserdem steht im PSDK unter Driveletter z.B. 'C:\', in obigem Beispiel würde der Driveletter '\\.\C:' sein, ist das auch erlaubt? |
Re: Sektoren auslesen
sorry,das war,weil wir getestet haben
handle soll das handle sein,h war nur tempörär zum fehlersuchen eingesetzt werd ich mal testen(wahrscheinlich aber net gleich morgen) @app - wenn die frage an mich war mit nem ? haben wirs auch getestet - leider ohne erfolg |
Re: Sektoren auslesen
Moin Armin,
ja diese Schreibweise ist, übrigens gemäss PSDK ;-), auch möglich. Schau Dir mal den Abschnitt unter "Physical disks and volumes" an. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:12 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz