Образовательный портал Claw.ru
Всё для учебы, работы и отдыха
» Шпаргалки, рефераты, курсовые
» Сочинения и изложения
» Конспекты и лекции
» Энциклопедии

Напоследок хочу рассказать о том, как узнать все скорости, которые поддерживает привод. Разместите на форме компоненты TComboBox и TButton. В обработчике события OnClick компонента TButton поместите следующий код:

var

 i : integer;

begin

 ComboBox1.Items.Clear; // очищаем элементы выпадающего списка

 

 with Cdroms.Cdroms[0] do // используем первый CD-ROM

 begin

 // открываем цикл от 1 до максимальной скорости привода

 for i := 1 to GetCDSpeeds(HaID, Target, Lun).MaxSpeed do

 begin

 SetSpeed(HaID, Target, Lun, i, 0); // устанавливаем скорость, равную i

 

 if i = GetCDSpeeds(HaID, Target, Lun).CurrentSpeed then

 // сравниваем, если текущая скорость равна i, заносим это

 // значение в выпадающий список


Рекомендуем скачать другие рефераты по теме: шпоры по гражданскому праву, заказать дипломную работу.


Категории:




Предыдущая страница реферата | 10  11  12  13  14  15  16  17  18  19  20 |


Поделитесь этой записью или добавьте в закладки

   



Рефераты от А до Я


Полезные заметки

  •