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 · 24.01.2017, 16:34 **[ТС]**

Ладно хорошо, Но почему тогда когда я стираю эти 10 символов, что набрал вылетает таже самая ошибка ))

@Dinkin · 24.01.2017, 16:47

sarsmen, Из разрада, "я познаю мир" =)

Потому что Вы не можете послать пустое значение на порт, потому нужно проверять есть ли что слать, типа так:

C++
1
2
if(!Edit1->Text.IsEmpty())
  ...тут ваша отправка

Добавлено через 10 минут
Ну и плюс в примере берется последний символ, что брать если символов нет,так что проверять надо обязательно

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

А как выполнить отчистку после отправки Edit1->Clear(); когда я пытаюсь это сделать он тоже выдаёт ошибку.

@Dinkin · 24.01.2017, 16:52

Сразу код показывайте

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

Сотрите я прописал глобальную переменную int bit=0; потом создал кнопку евент вставил туда код и спрятал её

Code
1
2
3
4
5
6
7
8
void __fastcall TTerminal::btnEventClick(TObject *Sender)
{
if(bit==0){
ComPort1->WriteStr('4');
Edit1->Clear();
 
}
}

В Edit1 выставил в событиях на OnClick этот эвент при конекте к устройству терминалом срабатывает bit==0; тоесть активируется этот эвент, при нажатии на поле Edit1 идёт отправка цифры 4 срабатывает на приёмнике запрос кода но из за того, что я вызываю ещё и

Code
1
Edit1->Clear();

стереть поле от мусора вылазит ошибка, раньше её небыло.

@Dinkin · 24.01.2017, 17:14

а этот код где у вас?

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

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

Code
1
2
3
4
5
void __fastcall TTerminal::Edit1Change(TObject *Sender)
{
ComPort1->WriteStr(Edit1->Text[Edit1->Text.Length()]);
 
}

@Dinkin · 24.01.2017, 17:17

C++
1
2
3
4
5
void __fastcall TTerminal::Edit1Change(TObject *Sender)
{
  if(!Edit1->Text.IsEmpty())
  ComPort1->WriteStr(Edit1->Text[Edit1->Text.Length()]);
}

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

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

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, 17:44

вы сами то хоть перепрочтите что написали, я во не че не понял)

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

Я понял )) При нажатии на галочку в чекбоксе показать пароль он не тока его отображает но и посылает последнюю нажатую клавишу.

@Dinkin · 24.01.2017, 18:19

где то пересекаются события...из того что вы написали это не поймешь)

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@sarsmen 3 / 2 / 2 Регистрация: 22.12.2016 Сообщений: 219
	24.01.2017, 16:34 [ТС]
	Ладно хорошо, Но почему тогда когда я стираю эти 10 символов, что набрал вылетает таже самая ошибка )) 0

@sarsmen 3 / 2 / 2 Регистрация: 22.12.2016 Сообщений: 219
	24.01.2017, 16:50 [ТС]
	А как выполнить отчистку после отправки Edit1->Clear(); когда я пытаюсь это сделать он тоже выдаёт ошибку. 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,150 Записей в блоге: 3
	24.01.2017, 16:52
	Сразу код показывайте 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,150 Записей в блоге: 3
	24.01.2017, 17:44
	вы сами то хоть перепрочтите что написали, я во не че не понял) 0

@sarsmen 3 / 2 / 2 Регистрация: 22.12.2016 Сообщений: 219
	24.01.2017, 18:13 [ТС]
	Я понял )) При нажатии на галочку в чекбоксе показать пароль он не тока его отображает но и посылает последнюю нажатую клавишу. 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,150 Записей в блоге: 3
	24.01.2017, 18:19
	где то пересекаются события...из того что вы написали это не поймешь) 0