codetools: fixed clearing errormsg, issue #32761, from Pascal

git-svn-id: branches/fixes_1_8@56579 -
This commit is contained in:
mattias 2017-12-02 10:30:42 +00:00
parent 2d59334c5a
commit 1f21a794e8

View File

@ -1437,6 +1437,8 @@ begin
fErrorLine:=-1;
fErrorTopLine:=0;
FErrorId:=0;
FErrorMsg := '';
FErrorDbgMsg := '';
end;
procedure TCodeToolManager.ClearCurCodeTool;