paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-26 15:14:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

Debugger: Watches, do not evaluate watches that are collapsed.

Browse Source
This commit is contained in:
Martin 2022-06-17 23:00:27 +02:00
parent 64c277e14c
commit b2c9e115f8
1 changed files with 3 additions and 0 deletions

3
debugger/watchesdlg.pp
View File

@ -1214,6 +1214,9 @@ begin
if (ThreadsMonitor = nil) or (CallStackMonitor = nil) then exit;
if GetStackframe < 0 then exit; // TODO need dedicated validity property
if not tvWatches.FullyVisible[VNode] then
exit;
if wdsfUpdating in FStateFlags then begin
if FCurrentWatchInUpDateItem <> AWatch then // The watch got data while we requested it, that is fine
FUpdateAllNeeded := True;