[charly911]

OK, then

pck.data[2]+pck.data[3]+pck.data[4]+pck.data[5] = (ps.ReadDEx(pck,4) ? 

and

with ps do begin
buf:=HexToString('4A 00 00 00 00'); 
WriteD(buf,2); 
WriteS(buf,msg); 
SendPacketStr(buf,getConnectioidByName(PlayerName),False); ?
end;

Ty, Charly.