* Merging revisions 42280 from trunk:

------------------------------------------------------------------------
    r42280 | michael | 2019-06-24 12:42:37 +0200 (Mon, 24 Jun 2019) | 1 line
    
    * Fix Bug ID #35759
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@42283 -
This commit is contained in:
michael 2019-06-25 05:57:41 +00:00
parent cfa1ddb5e4
commit d1c7fa73b6

View File

@ -331,6 +331,7 @@ begin
ExprTree := nil;
ExpColl := TExprCollection.Create;
try
FConstantsList.FreeAll;
// FCurrentExpression := anExpression;
ParseString(AnExpression, ExpColl);
Check(ExpColl);