Рефераты | Рефераты по информатике, программированию | Как сделать чтобы запущеный exe сам себя удалил? | страница реферата 15 | Большая Энциклопедия Рефератов от А до Я
Большая Энциклопедия Рефератов от А до Я
  • Рефераты, курсовые, шпаргалки, сочинения, изложения
  • Дипломы, диссертации, решебники, рассказы, тезисы
  • Конспекты, отчеты, доклады, контрольные работы

  • Напоследок хочу рассказать о том, как узнать все скорости, которые поддерживает привод. Разместите на форме компоненты 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 |




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

       




    Категории:



    Разделы сайта




    •