Тема: L2PacketHack 3.5.x
Показать сообщение отдельно
Старый 03.08.2008, 00:24   #8
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Вот так получаем в пакетхаке имя соединения:
delphi Код:
$04: if Thread[id].Name='' then begin      ii:=5*4+1;      while not((Packet.DataB[ii]=0)and(Packet.DataB[ii+1]=0)) do Inc(ii);      Dec(ii,5*4);      SetLength(WStr,ii div 2);      Move(Packet.DataB[5*4+1],WStr[1],ii);      Thread[id].Name:=WideStringToString(WStr,1251);      L2PacketHackMain.ComboBox1.Items.BeginUpdate;      iii:=L2PacketHackMain.ComboBox1.ItemIndex;      L2PacketHackMain.ComboBox1.Items.Clear;      for h1:=0 to MaxThr-1 do      if not Thread[h1].NoUsed         then L2PacketHackMain.ComboBox1.Items.Add(IntToStr(h1)+' - '+Thread[h1].Name)         else L2PacketHackMain.ComboBox1.Items.Add(IntToStr(h1)+' - пусто');      L2PacketHackMain.ComboBox1.ItemIndex:=iii;      L2PacketHackMain.ComboBox1.Items.EndUpdate; end;

То есть если имя не читаемое, то значит неверно расшифровывается трафик.
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился 6 спасибками от: