I have fount where is a problem
You need to use ControlCount and Controls[] instead of ComponentCount and Components[] . I have forgot that there is this 2 properties in Delphi :oops:
I have test it with your demo and after you replace it, all will work fine.
regards











