Код:
if FromServer and (pck.pckId=$03) then
begin
i:=22;
Name:=ps.ReadSEx(pck,i); //+1?? Пробывал.
ShowMessage('Найден: '+Name); // debug сообщений есть ли имя?
Почему не определяет имя?
Код:
Procedure SendPM(msg:string);
var
buf: string;
begin
with ps do begin
buf:=#$4A;
WriteD(buf,0);
WriteD(buf,10);
WriteS(buf,'');
WriteS(buf,msg);
SendPacketStr(buf,MyID,False);
end;
end;
При отправки данной процедуры я получаю ошибку вместе с сообщением и плагин завершается..
В чём может быть проблема?
Код:
// Процедура OnLoad устанавливает:
MyID:=ConnectInfo.ConnectID;