Показать сообщение отдельно
  #1  
Старый 06.03.2013, 13:45
Nimph Nimph вне форума
Прохожий
 
Регистрация: 06.03.2013
Сообщения: 8
Репутация: 10
По умолчанию Нужна помощь с ComPort-ом

Привет всем!!! Такой вопрос, только начал работать с ComPort-ом, решил прикрутить к Arduino программу написанную на Delphi, всё что делает этот код читает значения с потенциометра, значения (0 - 1023)...написал вот такой код:

Код:
procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer);
var
  s: String;
begin
  ComPort1.ReadStr(s, Count); // читаем строку из com порта
  Memo1.Text := Memo1.Text + s; // выводим прочтённую строку (вот тут ошибка!!!)
end;

procedure TForm1.Memo1Change(Sender: TObject);
var
  a,b:Integer;
begin
Memo1.Perform(EM_LINESCROLL,0,Memo1.Lines.Count-1); // авто прокрутка
a:=Memo1.Lines.Count-1; // записываем последнюю строчку в переменную
Edit27.Text:=Memo1.Lines[a]; // выводим в Edit последнюю строчку из Memo1

b:=StrToInt(Edit27.Text);
end;

Ошибка (is not a valid integer value) - не является допустимым целым значением

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

не могу найти ответа...просьба писать тех кто знает, а не посылать в Google или F1... заранее спасибо!!!
Ответить с цитированием