Ошибка тут:
SysComWrite(com_num,ADR(snd_str),2,0);
sz:=SysComRead(com_num,ADR(rcvBUF),19,0);
Вы послали запрос и сразу ждете что ответ придет. А реально вы его получите в сл. запросе (старый).
И Вы ожидаете, что ответ будет правильным, без мусора в начале и конце.






