- Get Hard Drive Serial Number Delphi serial numbers#
- Get Hard Drive Serial Number Delphi manuals#
- Get Hard Drive Serial Number Delphi software#
else bDriveHeadReg := $A0 or ((bDriveNum and 1) shl 4) if Win32Platform=VER_PLATFORM_WIN32_NT then bDriveHeadReg := $A0 Set up data structures for IDENTIFY command. If hDevice=INVALID_HANDLE_VALUE then Exit įillChar(SCIP,SizeOf(TSendCmdInParams)-1,#0) įillChar(aIdOutCmd,SizeOf(aIdOutCmd),#0) HDevice := CreateFile( '\\.\SMARTVSD', 0, 0, nil, CREATE_NEW, 0, 0 ) HDevice := CreateFile( '\\.\PhysicalDrive0', GENERIC_READ or GENERIC_WRITE,įILE_SHARE_READ or FILE_SHARE_WRITE, nil, OPEN_EXISTING, 0, 0 ) Įlse // Version Windows 95 OSR2, Windows 98 warning! change name for other drives: ex.: second drive '\\.\PhysicalDrive1\' If SysUtils.Win32Platform=VER_PLATFORM_WIN32_NT then // Windows NT, Windows 2000 Result := '' // return empty string on error Procedure ChangeByteOrder( var Data Size : Integer ) IdOutCmd : TSendCmdOutParams absolute aIdOutCmd Buffer of arbitrary length in which to store the data read from the drive.ĪIdOutCmd : Array of Byte Only valid when bDriverError is SMART_IDE_ERROR. Error code from driver, or 0 if no error. Physical drive number to send command to (0,1,2,3).īBuffer : Array of Byte // Input buffer. Now you can get real serial number of IDE hardisk.ġ204 "IDE harddisk serial number (Part 2)"įunction GetIdeSerialNumber : SerialNumber īFeaturesReg : BYTE // Used for specifying SMART "commands".īSectorCountReg : BYTE // IDE sector count registerīSectorNumberReg : BYTE // IDE sector number registerīCylLowReg : BYTE // IDE low order cylinder valueīCylHighReg : BYTE // IDE high order cylinder valueīDriveHeadReg : BYTE // IDE drive/head registerīCommandReg : BYTE // Actual IDE command.īReserved : BYTE // reserved for future use.
Get Hard Drive Serial Number Delphi serial numbers#
Of course, volume serial numbers for these disks are identical.
Get Hard Drive Serial Number Delphi software#
Use cloning tools for installing software on all new computers by copyingįrom the single harddisk to all another. It is assigned and changed during formatting of partition. But it is the volume serial number, not harddisk s/n.
Get Hard Drive Serial Number Delphi manuals#
Most FAQ manuals recommend to use GetVolumeInformation for extracting of "harddisk serial number". Question: You can get model name, firmware revision, serial number and other IDE harddisk information.
0 kommentar(er)
