Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: WinAPI и системное программирование > компонент cport и работа с COM портом

Автор: evgeny2k4 7.3.2009, 13:26

Добрый день, уважаемые!

Сразу оговорюсь, последний раз программировал под ДОСом лет 15 назад.
Для обработки информации от устройства через COM порт был выбран компонент ComPort Library от Dejan Crnila,
в принципе, наверное, это не важно.
Не могу реализовать следующую последовательность действий упрощенно:

Код


  s1s1,s1s6 : string;
  frag1,frag6 : string;

  s1s1 :=#$11+'1'+'1';
  s1s6 :=#$11+'1'+'6';

  BComPort1.WriteStr(s1s1); // отправляюю символы
  BComPort1.ReadStr(frag1, BComPort1.inBufCount()); // должен получить ответ

  BComPort1.WriteStr(s1s6); // отправляюю символы
  BComPort1.ReadStr(frag6, BComPort1.inBufCount()); // должен получить ответ

В итоге в буфер порта отправляется строка символов #$11+'1'+'1'+#$11+'1'+'6'

Объясните, неграмотному, что не так.

Автор: bartram 7.3.2009, 14:40

Что конкретно вас не устраивает? В чем вопрос?

Автор: evgeny2k4 7.3.2009, 14:54

При отправке данных #$11+'1'+'1' на устройство в ответ приходит Эхо + еще несколько символов, эту последовательность необходимо считать из буфера, и далее отправить #$11+'1'+'6' и опять считать последовательность. Но чтения не происходит по команде
BComPort1.ReadStr(frag1, BComPort1.inBufCount()); возможно из -за того что устройство не успевает ответить на посылку данных, а какие задавать интервалы опроса из файла помощи к компоненту не очень понятно.

Автор: kami 8.3.2009, 04:03

Код приведен в логике работы DOS программ.

С Windows все несколько иначе.

Код


BComPort1.WriteStr(s1s1); // отправляюю символы

На самом деле "отправка" означает только то, что данные были добавлены в буфер драйвера com-порта. Следующий оператор получает управление сразу же после "перегонки" в буфер драйвера. И так как данные очень даже возможно, еще не начали передаваться на внешнее устройство, оно (устройство) молчит.
Соответственно,

Код


BComPort1.ReadStr(frag1, BComPort1.inBufCount()); // должен получить ответ

просто возвращает пустую строку (ведь в приемном буфере порта ничего нет), и управление переходит следующему оператору, который "вдогонку" отправляет устройству еще одну команду.
Вполне возможно, что "по дороге" отправленные данные склеятся друг с другом, и неизвестно, как к этому отнесется устройство.

В cport (не использую этот компонент) должны быть события типа OnRead (что-то пришло из порта) и OnWrite (можно писать в порт - он готов к передаче данных). Логику обмена с устройством нужно основывать именно на этих событиях.
Причем, желательно не забывать, что записаться в порт может не вся последовательность (а, к примеру, 2 символа из 3-х) но это скорее всего произойдет при интенсивном обмене. Для простой задачи про это можно "забыть". То же можно сказать и про прием. Данные придут в нужном порядке, но вот за сколько событий OnRead - это неизвестно. Поэтому получаемые данные нужно накапливать в своем буфере, и обрабатывать их именно с учетом возможного "неполного прихода".

Автор: evgeny2k4 12.3.2009, 16:10

Спасибо, за ответ. Так оно и есть.