Можно вот так,искать по координатам? :
Цитата:
begin
begin
If FromServer and (pck[1]=#$16) and (pck[14]+pck[15]+pck[16]+pck[17]= hstr('xx xx xx xx')) and (pck[18]+pck[19]+pck[20]+pck[21]=hstr('yy yy yy yy')) and (pck[22]+pck[23]+pck[24]+pck[25]=hstr('zz zz zz zz')) then
begin
Obj.ID:=ReadD(2);
..................
...................
|