Серийный номер физ. диска

[B_N]

CTL_CODE - это известный макрос для формирования кодов IOCTL. Определяется как

#define CTL_CODE( DeviceType, Function, Method, Access ) (                 \
    ((DeviceType) << 16) | ((Access) << 14) | ((Function) << 2) | (Method) \
)

В паскале будет выглядеть как

__XXXXXX___ := ((DeviceType) shl 16) OR ((Access) shl 14) OR ((Function) shl 2) OR (Method));

[Jupiter]

Сишный код:

DWORD fCapabilities;
DWORD dwReserved[4];
USHORT Reserved3:15;

Здесь 3 разных объявления переменных, как их правильно перевести
на паскаль?

Заранее спасибо.

[B_N]

Сообщение от Jupiter

Сишный код:

DWORD fCapabilities;
DWORD dwReserved[4];
USHORT Reserved3:15;

Здесь 3 разных объявления переменных, как их правильно перевести
на паскаль?

Заранее спасибо.

fCapabilities - это dword, здесь, думаю, вопроса нет. Ну или cardinal, longword... dwReserved[4] - array [0 .. 3] of dword, а вот с Reserved3:15 сложнее - это битовое поле размером 15 бит. Возле него должно быть ещё одно, например в один бит. Кажется паскаль так не умел...

[Jupiter]

Сообщение от B_N

...а вот с Reserved3:15 сложнее - это битовое поле размером 15 бит. Возле него должно быть ещё одно, например в один бит. Кажется паскаль так не умел...

т.е. перевести нельзя?

И что значит "Возле него должно быть ещё одно, например в один бит."?
На паскале я не знаю типов размером в один бит, есть- ли такие?

[buenosaire]

Сообщение от B_N

Jupiter, если Вас не пугает C, посмотрите вот здесь... Ну а как на дельфи с этим вопросом... не знаю. В принципе там просто несколько вызовов DeviceIoControl и определение нескольких типов и констант...

А как сделать так, чтобы программа автоматически определяла CD-ROM и читала его серийник???