|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
10.06.2016, 01:08 | #1 |
Новичок
Джуниор
Регистрация: 10.06.2016
Сообщений: 10
|
BComPort в Delphi7
Доброе время суток. Прошу Вашей помощи. Имеется задача:
1. Прочитать ComPort. 2. Если значение 131, тогда изменить checked(RadioButton1) на True, если 130 тогда False. Прошу строго не ругать, я не работал раньше с ComPort. За ранее спасибо!!! Последний раз редактировалось Oksymoron; 10.06.2016 в 01:15. |
10.06.2016, 06:34 | #2 |
Форумчанин
Регистрация: 23.01.2016
Сообщений: 608
|
...где протокол обмена? Как идет поток данных?
Значит будем искать в массиве принятых: Код:
Последний раз редактировалось kutani; 10.06.2016 в 06:40. |
10.06.2016, 10:58 | #3 | |
Новичок
Джуниор
Регистрация: 10.06.2016
Сообщений: 10
|
[QUOTE=kutani;1613056]...где протокол обмена? Как идет поток данных?
У меня получается так, Arduino посылает в ComPort цифровые значения которые показывают состояние портов выхода а прога должна прочитать это значение и изменить RadioButton. Вот полный код программы: Цитата:
Последний раз редактировалось Oksymoron; 10.06.2016 в 11:20. |
|
10.06.2016, 12:55 | #4 |
Форумчанин
Регистрация: 23.01.2016
Сообщений: 608
|
...где код скетча?
При отсылке из скетча можно использовать команды записи в порт как с переводом каретки writeln(), так и без write(). Но в любом случае буратино шлет поток данных по UART побайтно. Cо стороны приемника на верхнем уровне, поскольку ОС Windows не realtime, байты эти могут склеиваться драйвером в один пакет, так и разрываться, идти одиночно и группами. Следует задать для себя примитивный протокол обмена, признак начала или окончания приема, этого у вас нет. Использовали асинхронное чтение в строку, оки. Допустим вы просто шлете байты и сделаем поиск по принятым: Код:
|
10.06.2016, 16:39 | #5 | |
Новичок
Джуниор
Регистрация: 10.06.2016
Сообщений: 10
|
Спасибо. Только при компиляции выбивает ошибку в строке
BComPort1.ReadStr(str, count); Вот коды: Цитата:
Последний раз редактировалось Oksymoron; 10.06.2016 в 16:56. |
|
10.06.2016, 17:30 | #6 | ||
Цифровой кот
Старожил
Регистрация: 29.08.2014
Сообщений: 7,629
|
Цитата:
Цитата:
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
|
||
10.06.2016, 17:34 | #7 |
Новичок
Джуниор
Регистрация: 10.06.2016
Сообщений: 10
|
|
10.06.2016, 17:40 | #8 |
Цифровой кот
Старожил
Регистрация: 29.08.2014
Сообщений: 7,629
|
а 132?
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
|
10.06.2016, 18:01 | #9 |
Новичок
Джуниор
Регистрация: 10.06.2016
Сообщений: 10
|
|
10.06.2016, 18:01 | #10 | |
Форумчанин
Регистрация: 23.01.2016
Сообщений: 608
|
Цитата:
Код:
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
как установить компонент bcomport в delphi7? | Виктор dubStep | Общие вопросы Delphi | 4 | 22.02.2015 00:04 |
Терминал BComPort выдает иероглифы. | azzzazzzelDEAN | Компоненты Delphi | 32 | 09.04.2014 16:18 |
Delphi7 | PAREN_DEFO | Помощь студентам | 0 | 08.11.2011 18:20 |
unable to rename 'C:\ProgramFiles\Borland\Delphi7\Bi n\Delphi32.$$$' to 'C:\Program Files\Borland\Delphi7\ | KazBoy | Помощь студентам | 1 | 12.04.2011 18:07 |