trough the api call GetFindedList when Findtype doesnt give you any re

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
trough the api call GetFindedList when Findtype doesnt give you any result
you can just call GetFindedList without calling FindType before
you do a first call to get the buffer len
to check if Findedlist is yielding result you do a firt call like this
and then you check bufferLen
if bufferLen > 0 then
begin
SetLength(FindedList, bufferLen div 4);
Script_GetFindedList(FindedList, bufferLen);
problem is that when FindedList is empty bufferLen is '4' and not '0'
this is appening also for IgnoreList
have a characted connected and trough the API call two times the CorrectDisconnection() procedure
every second time stealth will crash
An exception raised at <<13 aprile>>, 00:19:18:520
Access violation at address 00A4ECAF in module 'Stealth.exe'. Read of address 0000009C
(0064DCAF){Stealth.exe } [00A4ECAF] ScriptDLLSockets.TDLLSocketsScriptThread.SendDllExecEventProc (Line 2471, "ScriptDLLSockets.pas")
Call stack:
(0064DCAF){Stealth.exe } [00A4ECAF] ScriptDLLSockets.TDLLSocketsScriptThread.SendDllExecEventProc (Line 2471, "ScriptDLLSockets.pas")
(0064DF44){Stealth.exe } [00A4EF44] ScriptDLLSockets.TDLLSocketsScriptThread.ExecEvent (Line 2491, "ScriptDLLSockets.pas")
(0066D0E2){Stealth.exe } [00A6E0E2] ClassCharacter.TCharacter.TryExecEventHandler (Line 11083, "ClassCharacter.pas")
(00664714){Stealth.exe } [00A65714] ClassCharacter.TCharacter.GetInfoFromPacket_0x6E (Line 7990, "ClassCharacter.pas")
(0065FD10){Stealth.exe } [00A60D10] ClassCharacter.TCharacter.RedirectGamePacket (Line 6293, "ClassCharacter.pas")
(0065EAE9){Stealth.exe } [00A5FAE9] ClassCharacter.TCharacter.GameClientOnRead (Line 5786, "ClassCharacter.pas")
(00224FCD){Stealth.exe } [00625FCD] System.Win.ScktComp.TCustomSocket.Event (Line 1903, "System.Win.ScktComp.pas")
(0022366A){Stealth.exe } [0062466A] System.Win.ScktComp.TCustomWinSocket.Event (Line 1013, "System.Win.ScktComp.pas")
(00223BD5){Stealth.exe } [00624BD5] System.Win.ScktComp.TCustomWinSocket.WndProc (Line 1201, "System.Win.ScktComp.pas")
(000B5BE8){Stealth.exe } [004B6BE8] System.Classes.StdWndProc (Line 17013, "System.Classes.pas")
(001E7937){Stealth.exe } [005E8937] Vcl.Forms.TApplication.ProcessMessage (Line 10288, "Vcl.Forms.pas")
tird problem is this:
Error, Invalid events params count, event ignored.
EventNum: 16
Reprot to developer now!
SetEventProc('evSpeech', OnSpeech)
SetEventProc('evUnicodeSpeech', OnSpeech)