Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Насчет работы с com-портом [Delphi, Windows]


Danger ©   (2008-11-26 11:32:00) 

Кто-нибудь может поделиться рабочим примером, для работы с COM-портом? (для любого из доступных компонентов под KOL). Или хотя бы документацией по компонентам, если таковая имеется.

Заранее спасибо.


exero   (2008-11-27 09:22:00) [1]

А вы в исходники не смотрели? - там автор забил на ошибки - надо будет самому немного поковырять, в том числе и деструкторы подправить, чтобы память не текла. У меня к сожалению исправленной версии не осталось. Но править на сколько я помню там много не надо - за пару часов управитесь.


Danger   (2008-11-27 09:14:00) [2]


> exero   (26.11.08 14:25) [1]
>
> Задача была - послать на внешнее устройство (измерительный прибор)
> набор из 6 байт, а потом принимать все входящее от него
> - послал через WriteStr - данные получал в ComPortRxChar.

Странно, в системе на ноутбуке нет ни одного СОМ-порта (в том числе, виртуального). Делаю:
ComPort.Port:= 'COM1';
ComPort.Open;

так переменная Connectedв True!

Пишу в обработчике OnError:
procedure TForm1.ComPortError( Sender: PObj; Count: Integer );
begin
msgok('error');
end;

и пишу в порт: ComPort.Write( mystr, 1 );
следом читаю: ComPort.Read( mychar, 1 );
Сообщений об ошибках нет, как такое может быть?


L`Autour   (2008-11-27 05:56:00) [3]

А я использовал KOLCom. MHComPort я пробовал использовать потом, но он мне чем-то не подошел (уже не помню чем).


exero   (2008-11-26 14:25:00) [4]

У меня заработал только MHComPort - с полпинка, остальные требовали большего внимания - и я на них забил. В принципе все что мне нужно было - сделал особо не напрягаясь. Задача была - послать на внешнее устройство (измерительный прибор) набор из 6 байт, а потом принимать все входящее от него - послал через WriteStr - данные получал в ComPortRxChar.


Наверх

Титульная страница Поиск, карта сайта Написать письмо