wm-help.net -> Электронная библиотека -> Delphi -> Вопросы и Ответы по Delphi -> Вопрос и Ответ 47 -> Версия для печати

Вопрос и Ответ 47

Вопрос и Ответ 47

Вопросы и Ответы


      47. Как установить часы компьютера?

      Для установки часов можно воспользоваться функцией 2DH прерывания 21H. В CH помещаются часы, в CL - минуты, в DH - секунды, а в DL - сотые доли секунды.

      Пример:

      ............

      PROCEDURE SetTime(Hour, Min, Sec: Word); ASSEMBLER;
      ASM

        MOV CH, BYTE PTR Hour
        MOV CL, BYTE PTR Min
        MOV DH, BYTE PTR Sec
        MOV DL, 0
        MOV AH, 2DH
        INT 21H

      END;

      ............


...предыдущая страница следующая...
оглавление

Rambler's Top100