Получение доступа к портам жесткого диска в Windows 7? Как получить доступ к портам жёсткого диска в Windows 7, используя Delphi или С/C++?
В основном интересуют интерфейсы SATA и IDE. В Windows XP такой проблемы не возникает. Решение через Virtual PC (всякие XP Mode) или другие виртуальные машины с использованием Win XP не годятся.

Предыдущий
вопрос Следующий
вопрос

Для получения доступа к портам жесткого диска в Windows 7 через Delphi или С/C++ можно использовать Windows API функции или библиотеки, такие как IOCTL_STORAGE_QUERY_PROPERTY или IOCTL_ATA_PASS_THROUGH.

Пример использования IOCTL_STORAGE_QUERY_PROPERTY для получения информации о жестких дисках в системе:

const
IOCTL_STORAGE_QUERY_PROPERTY = $002D1400;
PropertyStandardQuery = 0;
StorageDeviceProperty = 0;
type
STORAGE_PROPERTY_QUERY = record
PropertyId: DWORD;
QueryType: DWORD;
AdditionalParameters: array[0..2] of Byte;
end;
var
hDevice: THandle;
propQuery: STORAGE_PROPERTY_QUERY;
dwBytesReturned: DWORD;
buffer: array[0..4095] of Byte;
begin
hDevice := CreateFile('\\.\PhysicalDrive0', GENERIC_READ or GENERIC_WRITE, FILE_SHARE_READ or FILE_SHARE_WRITE, nil,
OPEN_EXISTING, 0, 0);
if hDevice <> INVALID_HANDLE_VALUE then
begin
propQuery.PropertyId := StorageDeviceProperty;
propQuery.QueryType := PropertyStandardQuery;
DeviceIoControl(hDevice, IOCTL_STORAGE_QUERY_PROPERTY, @propQuery, SizeOf(propQuery), @buffer, SizeOf(buffer), @dwBytesReturned, nil);
// Обработка полученных данных
CloseHandle(hDevice);
end;
end.

Для работы с портами SATA и IDE (возможно, вам понадобится драйвер уровня ядра), возможно придется использовать дополнительные функции и структуры данных. Пожалуйста, помните, что доступ к портам жесткого диска напрямую требует прав администратора и может быть опасен для стабильности и безопасности системы. Поэтому перед внесением изменений в порты жесткого диска, убедитесь, что понимаете возможные риски и последствия.