всё правильно, и что значит пытается сдать? что пишет?
После строчки где запоминает пакет здачи поставь строку оповещения в чат чтобы быть уверенным что точно запомнено то что нужно.
if FromClient and (ConnectName = 'NAME') and (pck[1]=#$C4) then
begin
//запоминаем его полностью
PaketManora:=pck;
здесь отправка твоего сообщения.
Если не получиться то промониторь пакетхаком что точно шлется на сервер при попытке купить семена.
|