Scrolling on a filter TTMSFNCFilterView cause a compiler error during compilation

Hello,

I ran into an issue that seems to be caused by TMS WEB CORE.

Follow these steps to reproduce the issue:

  1. Using Delphi 64, c

    FilterTest.zip (8.5 KB)

    reate a new tms web core application project and drop a TTMSFNCFilterView on the form.

  2. Add enough TTMSFNCFilterViewExpressionValueEdit items so the list runs beyond the screen.

  3. Save and build the project

  4. Receive a compiler hint - [Hint] TMS.TMSFNCFilterStructure.pas(133): Private field "TTMSFNCFilterStructure.FOwner" is assigned but never used

  5. Now add enough controls, in my case ExpressionValueControl, so the vertical scroll bar appears. After that scroll the bar to the bottom.

  6. Save and build the project

  7. Receive the following error: [Hint] TMS.TMSFNCFilterStructure.pas(133): Private field "TTMSFNCFilterStructure.FOwner" is assigned but never used

  8. After that Delphi get unstable and the project gets corrupted.

I have attached a zip file that contains the project with the issue as directed above.

Please, let me know if this is a bug in TMS code, or if I missed anything.

Thanks,

Alan

FilterTest.zip (8.5 KB)

Thank you for letting us know.

We traced the error and it will be solved in the next release of TMS WEB Core.

Thank you