О плагинах для l2phx 3.4.1+

[alexsl]

приветы,
вот возникла такая вот ситуевина:

procedure OnPacket(const cnt: Cardinal; const fromServer: Boolean; var pck: TPacket); stdcall;
begin
  if pck.size<3 then
    exit;
  if not FromServer and(pck.id=$49)and(bot.cntID=0)then
  begin
      // если в процедуре вызвать [b]ps.ReadSEx[/b]
      // то после завершения процедурки
      // выскакивает ексепшн EInvalidPointer
      if(lowercase([b]ps.ReadSEx(pck,3)[/b])='set')then
      begin
        pck.size:=2; // не пропускаем пакет
        bot.cntID:=cnt;
        Say('Выбрано это соединение.',bot.cntID);
      end;
  end;
end;

пробывал заменить на

s:=ps.DataPckToStrPck(pck);
if(lowercase(ps.ReadS(s,2))='set')then

выходит аналогичная ошибка.
мб ктонить подскажет, в какую сторону копать.
зы: HB T1.5, пхикс 3.4.81 ( 3.4.68 ) под ХП СП3 крутится на виртуальной машине

[QaK]

alexsl, дельфа какая версия?

[alexsl]

QaK, угу забыл указать юзаю Д7. спсб, попробую скомпилить под Д2005

[QaK]

alexsl, вот поэтому и эксепшн вылазит, перекомпиль в 200х норм должно пхать, хз с чем связано ...