Зависает L2phx,
на при работе с плагинами тоесть при выключение зависает в 0 иногда вылетает с критом,
причем, если в плагине обрабатывать пакеты только входящие то ни каких проблемм
после вот такого пакета тоже не виснет
delphi Код:
buf:=ps.HexToString('56 00 00 00 00 00 00 00 00 00');
ps.SendPckStr(buf,ConnectId,true);
а если отправлять тако пакет
delphi Код:
buf := ps.HexToString('21 01 00 02 00 04 00');
ps.WriteD (buf, RandomID);
ps.WriteD (buf, QItemID);
buf := buf + ps.HexToString('11 00 00 00 01 00 00 00 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF FF FF FF FE FF FF FF 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 F1 D8 FF FF');
ps.SendPckStr(buf,ConnectId,False);
при отключении плагина всё виснет
для тестов вот пример полностью
delphi Код:
procedure OnLoad; stdcall;
var
i: integer;
buf:string;
begin
//menuID:= 'scr_'+ IntToStr(RandomID) +'?';
for i:=0 to ps.ThreadsCount-1 do begin
ConnectId:=i;
Say('Для запуска плагина наберите в чате слово start и отправьте');
buf:=ps.HexToString('56 00 00 00 00 00 00 00 00 00');
ps.SendPckStr(buf,ConnectId,true);
buf := ps.HexToString('21 01 00 02 00 04 00');
ps.WriteD (buf, RandomID);
ps.WriteD (buf, QItemID);
buf := buf + ps.HexToString('11 00 00 00 01 00 00 00 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF FF FF FF FE FF FF FF 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 F1 D8 FF FF');
ps.SendPckStr(buf,ConnectId,False);
buf := ps.HexToString('44 01 00 00 00 0C 00 00 00');
ps.WriteD(buf, RandomID);
buf := buf + ps.HexToString('01 00 00 00 FF FF FF FF 00 00 00 00 00 00 00 00 00 00 00 00');
ps.SendPckStr(buf,ConnectId,False);
end;
end;