Работа с потоком

[Yur@]

Всем привет. Есть некий девайс, который посылает посылки фиксированной длины на ком порт компьютера. Принимаю данные от девайса в потоке. Проблема вот в чем. Мне надо постоянно проверять один и тот же байт из посылки и сравнивать его с числом (посылка приходит как массив байт). Например, массив 34 54 23 54 65 34 23 54 , проверить надо 3-й байт, если он больше 30 то вывести в мемо строку ('>30') один раз. А так как у меня всё это дело крутится в потоке, у меня мемо забивается одной и той же строкой. Что делать? Приостановка потока не катит. Пробовал сделать второй поток, но думаю должен быть вариант как это проще сделать.

[evg_m]

вар.1 Memo.Clear; Memo.add('>30'); <=> вар.2 Memo.Text:='>30';
если ТОЛЬКО одна строка то зачем Memo. вполне подойдет StaticText..

если он больше 30 то вывести в мемо строку ('>30') один раз.

Ну вывели дальше-то что? вот пришел сигнал у которого <30.(после сигнала >30) И где у нас информация о таком сигнале. Т.е. после получения первого сигнала >30 информативность работы =0.

[veniside]

> должен быть вариант как это проще сделать

var
  flag: boolean = true;

// в нашем потоке
  if (flag and (30 < b[3])) then begin
    //
    flag := false;
    // посылаем сообщение для мемо, чтобы оно добавило строку '>30'
  end;

[Yur@]

Мемо точно нужен. Это что то вроде лога. В нем присутствуют ещё другие сообщения (время запуска, время завершения, и т д). Очищать его смысла нет.