FreePascal.ru

http://expert.delphi.int.ru/question/67/

Вот я почитал там, и вспомнил про один немаловажный аспект. Как узнать, открыт или закрыт дисковод в данный момент?

Все, прочитал код, разобрался. Там, оказывается, все написано.

Собственно говоря, в системе два дисковода, и хотелось бы иметь возможность выбирать между ними. Раньше я писал подобную программу в Delphi, но там название импортируемого Unit'а отличается.
Да и дисковод тогда у меня был один. А само обращение к функции выглядело примерно так:
mciSendString(&#91 ...