ComPort library Потеря символов

@sarsmen · Регистрация: 22.12.2016

Студворк — интернет-сервис помощи студентам

Кто то может работал с этой библой, делаю отправку 10 символов по нажатию кнопки с поля Edit1, первые 10 символов улетают полностью при вводе следующих 10 символов теряются значения, то 7 улетит то 6. Кто то сталкивался с такой проблеммой?

C++
1
2
3
4
5
6
7
8
9
10
void __fastcall TTerminal::btnSendClick(TObject *Sender)
{
ComPort1->ClearBuffer(True,True);
if(Edit1->Text.Length()>9){
 
   ComPort1->WriteStr(Edit1->Text);
  Edit1->Text = "";
   Edit1->Clear();
   }
}

@sarsmen · 22.01.2017, 09:23 **[ТС]**

не уж то не кто не сталкивался?

@sarsmen · 24.01.2017, 06:45 **[ТС]**

потеря данных происходит в

C++
1
2
3
4
if (Edit1->Text.Length()>9){
ComPort1->WriteStr(Edit1->Text);
Edit1->Text = "";
}

Тоесть после обработки и запуска второй раз символы теряются.

@Dinkin · 24.01.2017, 07:51

мб надо определять после загрузки позиции или обнулять их.

@sarsmen · 24.01.2017, 09:01 **[ТС]**

мб я не знаю, всё перепробывал и обнуление буфера ком порта, и как видите обнуление строки едит идёт, там работа такая, после ввода 10 символов идёт отправка на ком порт после чего приходит ответ о введеннии новых значений, послле ввода и отправки на замену из 10 символов пропадает штук 5-6, если их отправлять по одному то всё нормально, а мне нужно пачкой в 10 символов)))

@Dinkin · 24.01.2017, 09:04

Я про компонент,какие у него параметры?или скинте сам компонент)

@sarsmen · 24.01.2017, 12:15 **[ТС]**

Вообщем поковырял я сторону приёмника и передатчика, само устройство борохлит. Как бы сделать отправку посимвольно с поля едит тока не стирать предыдущие чтобы видить что ты написал, а то забудешь невзначай.

Добавлено через 1 час 37 минут
Сделал так

C++
1
ComPort1->WriteStr(Edit1->Text.Length());

оправляется посимвольно но одни цифры начиная с 123.. и так далее, почему не печатает то, что набераю я?

@Dinkin · 24.01.2017, 12:24

Пришлите компонент =) или сделайте сркин подсказки его параметров и функций.

@sarsmen · 24.01.2017, 13:38 **[ТС]**

Вы про библиотеку к билдеру? то вот.

@Dinkin · 24.01.2017, 13:57

Вобщем, в документации есть примеры, и там каждая отправка завершается разделительным символом. Полистайте, там все есть.

@sarsmen · 24.01.2017, 14:17 **[ТС]**

Мне это не поможет мне нужно сделать , что то вроще счётчика отправки с Edit1->Text чтобы отправлялось каждая нажатая буква или цифра, но не затиралась в поле Edit1->Text чтобы видеть, что я ввожу можно до 10 символов можно до двадцати это не важно счётчик я думаю выглядит как то так

Code
1
for (int i = 0; i < Edit1->Text.Length(); i++)

но, что делать дальше не могу сообразить как поставить в if и, что чтобы отправлялось повторюсь по одному набранному символу в поле Edit1->Text!

@Dinkin · 24.01.2017, 14:21

sarsmen, Еще раз с другого боку описать задачу можете, то малость не уловил смысл =)

@sarsmen · 24.01.2017, 14:43 **[ТС]**

Ну чтож тут не понятного, вот функция отправки набранного в поле Edit1->Text

Code
1
ComPort1->WriteStr(Edit1->Text);

Она зашита в Edit1Change тоесть выполняет каждоё твоё нажатие, как нажал она сработала, но мне не нужно чтобы она отправляла допустим нажал я 1 она отправила 1 надал 2 она отправила 1 и 2 потому что я не хочу стирать каждое нажатие и видеть его в поле Edit1->Text тоесть нажал я 1 и 2 и потом нажал 3 отправилось не 123 а следущи

@Почтальон · 24.01.2017, 14:56

Так смените на другой обработчик, а не Change

@sarsmen · 24.01.2017, 15:09 **[ТС]**

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

@Dinkin · 24.01.2017, 15:17

Сообщение от sarsmen

Ну чтож тут не понятного,

Не язвите =)

Я вроде понял, что вы имеете ввиду. Вам нужна задержка, пишите-пишете, и после он отправляет

Кидаете на форму выключенный таймер таймер . и заводите глобальную переменную int i= 3;
и код такймера такой:

C++
1
2
3
4
5
6
7
8
9
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
 if(1>--i)
   {
       ComPort1->WriteStr(Edit1->Text);
       Timer1->Enabled = false;
   }
}
//---------------------------------------------------------------------------

У едита в событии KeyPress след код:

C++
1
2
3
4
5
6
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, System::WideChar &Key)
{
 i =3;
 Timer1->Enabled = true;
}
//---------------------------------------------------------------------------

@sarsmen · 24.01.2017, 15:40 **[ТС]**

Сообщение от Dinkin

пишите-пишете, и после он отправляет

И опять он оправит кучу и клиент это не примет ему нужно принимать каждое нажатия по разу =)
Вообщем вы меня не поймёте очень жаль

@Dinkin · 24.01.2017, 15:44

C++
1
ComPort1->WriteStr(Edit1->Text[Edit1->Text.Length()]);

?

@sarsmen · 24.01.2017, 16:24 **[ТС]**

Отлично, Спасибо работает но зато теперь ругается на функцию показывать не показывать пароль

Code
1
2
3
4
5
6
7
void __fastcall TTerminal::CheckBox1Click(TObject *Sender)
{
if (CheckBox1->Checked) {
 Edit1->PasswordChar='\0';
 }else{
 Edit1->PasswordChar='*';
} }

Тоесть поставил галочку программа вылетела с ошибкой )

@Dinkin · 24.01.2017, 16:29

Это Вы где то сами накосячили с событиями

Новые блоги и статьи Все статьи Все блоги /
Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .

@sarsmen 3 / 2 / 2 Регистрация: 22.12.2016 Сообщений: 219
	22.01.2017, 09:23 [ТС]
	не уж то не кто не сталкивался? 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,154 Записей в блоге: 3
	24.01.2017, 07:51
	мб надо определять после загрузки позиции или обнулять их. 0

@sarsmen 3 / 2 / 2 Регистрация: 22.12.2016 Сообщений: 219
	24.01.2017, 09:01 [ТС]
	мб я не знаю, всё перепробывал и обнуление буфера ком порта, и как видите обнуление строки едит идёт, там работа такая, после ввода 10 символов идёт отправка на ком порт после чего приходит ответ о введеннии новых значений, послле ввода и отправки на замену из 10 символов пропадает штук 5-6, если их отправлять по одному то всё нормально, а мне нужно пачкой в 10 символов))) 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,154 Записей в блоге: 3
	24.01.2017, 09:04
	Я про компонент,какие у него параметры?или скинте сам компонент) 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,154 Записей в блоге: 3
	24.01.2017, 12:24
	Пришлите компонент =) или сделайте сркин подсказки его параметров и функций. 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,154 Записей в блоге: 3
	24.01.2017, 13:57
	Вобщем, в документации есть примеры, и там каждая отправка завершается разделительным символом. Полистайте, там все есть. 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,154 Записей в блоге: 3
	24.01.2017, 14:21
	sarsmen, Еще раз с другого боку описать задачу можете, то малость не уловил смысл =) 0

@Почтальон управление сложностью 1693 / 1306 / 259 Регистрация: 22.03.2015 Сообщений: 7,545 Записей в блоге: 5
	24.01.2017, 14:56
	Так смените на другой обработчик, а не Change 0

@sarsmen 3 / 2 / 2 Регистрация: 22.12.2016 Сообщений: 219
	24.01.2017, 15:09 [ТС]
	а не в нём дело, дело на стороне клиента он пачку символов не хочет обрабатывать, вот и нужно по одному отправлять но при этом не затирать каждый нажатый в едите, а отправлять следующий. 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,154 Записей в блоге: 3
	24.01.2017, 16:29
	Это Вы где то сами накосячили с событиями 0