diff --git a/debugger/watchesdlg.pp b/debugger/watchesdlg.pp index f185f2bcd5..e6457a39ff 100644 --- a/debugger/watchesdlg.pp +++ b/debugger/watchesdlg.pp @@ -1015,7 +1015,7 @@ begin FCurrentWatchInUpDateItem := AWatch; try tvWatches.NodeText[VNode, COL_WATCH_EXPR-1]:= AWatch.Expression; - if AWatch.HasAllValidParents(GetThreadId, GetStackframe) then begin + if AWatch.Enabled and AWatch.HasAllValidParents(GetThreadId, GetStackframe) then begin WatchValue := AWatch.Values[GetThreadId, GetStackframe]; if (WatchValue <> nil) and ( (GetSelectedSnapshot = nil) or not(WatchValue.Validity in [ddsUnknown, ddsEvaluating, ddsRequested]) ) @@ -1058,6 +1058,9 @@ begin end; end else + if not AWatch.Enabled then + tvWatches.NodeText[VNode, COL_WATCH_VALUE-1]:= '' + else if (GetSelectedSnapshot = nil) and (DebugBoss <> nil) and (DebugBoss.State in [dsPause, dsInternalPause]) then