Index out of range in TIPSocketWorkerThread.IntExecute

DataAbstract for Delphi, latest release build. In uIPAsyncSocket.pas, line 968…

for i := 0 to SocketsPerWorkerThread do begin

…causes i to go outside the range of…

fData: array[0… SocketsPerWorkerThread-1]

Presumably it should be…

for i := 0 to SocketsPerWorkerThread-1 do begin

Thx, you are right.
fixed