List index out of bounds

[hafedh-trimeche]

Hello,

Zeos Version: 8.0.0-release
Please note this exception:

===============================================================================
Processor             : Dell Inc., 093NCR, Intel64 Family 6 Model 183 Stepping 1, 13th Gen Intel(R) Core(TM) i9-13900HX, 2.419 GHz
System                : Windows 11 (Version 23H2, OS Build 22631.3447, 64-bit Edition)
Display               : 2560x1440 pixels, 96 bpp
Total Physical Memory : 63.692 GB
Free Physical Memory  : 50.943 GB
Max used Memory       : 1.480 GB
===============================================================================
Exception class       : EListError
List index out of bounds (-1)
Exception address     : 0000000001114804
Exception trigger     : ApplicationEvents
-------------------------------------------------------------------------------
Module                : JclDebug
Command Line          : BuildDB
Procedure             : JclDebug.TJclStackInfoList.Create
Unit                  : JclDebug.pas
Line                  : 5722
-------------------------------------------------------------------------------
[00000000009DC7F1] JclDebug.TJclStackInfoList.Create (Line 5722, "JclDebug.pas" + 34) + $0
[00000000009DC338] JclDebug.JclCreateStackList (Line 5564, "JclDebug.pas" + 1) + $3F
[00000000009DC236] JclDebug.DoExceptionStackTrace (Line 5505, "JclDebug.pas" + 20) + $15
[00000000009DEF17] JclDebug.DoExceptNotify (Line 6995, "JclDebug.pas" + 7) + $0
[00000000009CE465] JclHookExcept.TNotifierItem.DoNotify (Line 272, "JclHookExcept.pas" + 5) + $11
[00000000009CE6AB] JclHookExcept.DoExceptNotify (Line 339, "JclHookExcept.pas" + 13) + $2B
[00000000009CE805] JclHookExcept.HookedRaiseException (Line 381, "JclHookExcept.pas" + 14) + $0
[00000000001E1503] System.@RaiseAtExcept + $103
[00000000001E1521] System.@RaiseExcept + $11
[0000000001114804] ZDatasetParam.TZParam.GetIsNulls (Line 2032, "ZDatasetParam.pas" + 4) + $10
[000000000111D14E] ZDatasetParam.TZParam.SetIsNulls (Line 4253, "ZDatasetParam.pas" + 1) + $B
[0000000001118D40] ZDatasetParam.TZParam.SetAsBytesArray (Line 3121, "ZDatasetParam.pas" + 3) + $D
[0000000001118C05] ZDatasetParam.TZParam.SetAsBytes (Line 3104, "ZDatasetParam.pas" + 2) + $0
[00000000011416D0] uDB.RecordToParams (Line 1930, "uDB.pas" + 32) + $B
[000000000114197E] uDB.generic_tb_update (Line 1971, "uDB.pas" + 22) + $0
[0000000001141AD8] uDB.tb_put (Line 1983, "uDB.pas" + 3) + $0
[00000000014B34BC] uServer.TMainForm.OpenDataBase (Line 166, "uServer.pas" + 31) + $190
[00000000014B3EB5] uServer.TMainForm.ControllerStart (Line 239, "uServer.pas" + 7) + $0
[00000000011C431E] uMainForm.TUForm.AsyncActivate (Line 1123, "uMainForm.pas" + 8) + $0
[00000000011C4E26] uMainForm.TUForm.WndProc (Line 1352, "uMainForm.pas" + 5) + $C
[00000000003F909C] Vcl.Controls.TWinControl.MainWndProc + $2C
[0000000000319136] System.Classes.StdWndProc + $26
[00007FFB53DC8961] Unknown function at DispatchMessageW + $741
[00007FFB53DC8421] Unknown function at DispatchMessageW + $201
[0000000000541D43] Vcl.Forms.TApplication.ProcessMessage + $133
[0000000000541DB8] Vcl.Forms.TApplication.HandleMessage + $18
[000000000054220F] Vcl.Forms.TApplication.Run + $EF
[00000000014C2F6E] RMSServer.RMSServer (Line 21, "" + 6) + $0
[00007FFB53CF257D] BaseThreadInitThunk + $1D
[00007FFB54F8AA48] RtlUserThreadStart + $28

Best regards.