diff --git a/debugger/inspectdlg.pas b/debugger/inspectdlg.pas index 5dd6ca4690..f2d3bf121f 100644 --- a/debugger/inspectdlg.pas +++ b/debugger/inspectdlg.pas @@ -899,6 +899,12 @@ procedure TIDEInspectDlg.EvaluateCallback(Sender: TObject; ASuccess: Boolean; ResultText: String; ResultDBGType: TDBGType); begin FUpdateLock := False; + if FUpdateNeeded then begin + Clear; + UpdateData; + exit; + end; + FExpressionWasEvaluated := True; FHumanReadable := ResultText;