paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-17 23:49:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

Debugger: Fix evaluate dialog. Respect length of array. Broken since bca093c6ec "Debugger: redesign Inspect and Evaluate-Modify windows"

Browse Source
This commit is contained in:
Martin 2022-09-05 16:06:47 +02:00
parent 7a4e58e4d3
commit 715d70dc38
1 changed files with 3 additions and 1 deletions

4
ide/packages/idedebugger/frames/watchinspecttoolbar.pas
View File

@ -846,7 +846,9 @@ begin
AWatch.EvaluateFlags := Opts;
AWatch.DbgBackendConverter := Conv;
AWatch.Enabled := True;
AWatch.RepeatCount := ArrayNavigationBar1.PageSize;
AWatch.RepeatCount := 0;
if ArrayNavigationBar1.Visible then
AWatch.RepeatCount := ArrayNavigationBar1.PageSize;
FInspectWatches.EndUpdate;
FCurrentWatchValue := AWatch.Values[tid, idx];
if FCurrentWatchValue <> nil then begin