Новые книги

Просто, лаконично и доступно, с множеством примеров, изложены основы маркетинга предприятия. Разработка маркетинговой программы предприятия и ее реализация рассматривается как единый процесс, состоящий из анализа рынка, оценки особенностей предприятия, выбора конкурентного преимущества, формирования стратегии развития и контроля ее выполнения.

Книга предназначена для предпринимателей, начальников отделов и директоров компаний, менеджеров по маркетингу. Она будет также полезна для слушателей школ МВА, студентов, магистрантов и аспирантов, специализирующихся в области маркетинга.
Почему люди не понимают друг друга? Почему даже самые понятные и четкие ваши аргументы или идеи вызывают иногда у других ярое сопротивление или недоверие? Как сделать так, чтобы ваши доводы были услышаны и приняты?

С несогласием, возражениями и вопросами мы встречаемся постоянно. Мы слышим их от клиентов и партнеров по бизнесу, от друзей и знакомых, от родных и близких. Иногда мы не знаем, что и как сделать, чтобы нас поняли и приняли нашу точку зрения.

Книга адресована тем, кто по роду своей деятельности постоянно находится в контакте с людьми: продавцам, менеджерам, руководителям различного ранга, психологам, бизнес-консультантам, тренерам и всем, кто хотел бы быть более успешным в бизнесе и жизни. Здесь вы найдете множество идей превращения «нет» в «да».

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

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


      37. Как получить данные из COM порта?

      Работа с портами в Delphi ни чем, принципиально, не отличается от работы с портами в других языках программирования. Можно использовать определенный массив Port, который позволяет считывать и записывать значения, но его использование не всегда оправдано, поскольку не обеспечивает необходимой гибкости и полученный код работает довольно медленно. Лучший результат дает использование процедур написанных на ассемблере.

      Базовые адреса двух COM портов, для справки:

        COM1 - 3F8h
        COM2 - 2F8h

      Пример:

      Простейший вид процедур посылки и получения данных.

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

      {процедура посылки данных в порт}
      procedure PortOut(Port: Word; Data: Byte); assembler;
      asm

        MOV DX,Port;
        MOV AL,Data
        OUT DX,AL

      end;

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

      {функция получения данных из порта}
      function PortIn(Port: Word): Byte; assembler;
      asm

        MOV DX,Port;
        IN AL,DX

      end;

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


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



"Вопрос и Ответ 37"
Copyright © "В помощь Веб-Мастеру" (Alexander D. Belyaev) 2005-2024 .
При перепечатке любого материала видимая ссылка на источник "В помощь Веб-Мастеру" и все имена, ссылки авторов обязательны!
Время генерации страницы: 0.006