Тема: l2ph -> Plugins
Показать сообщение отдельно
Старый 04.02.2012, 18:06   #6
Пользователь
 
Регистрация: 14.01.2011
Сообщений: 48
Сказал Спасибо: 19
Имеет 4 спасибок в 3 сообщенях
Denever пока неопределено
Восклицание

Код:
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;

Последний раз редактировалось Denever, 04.02.2012 в 18:10.
Denever вне форума   Ответить с цитированием