Dass solche unsauberen Tricks nicht unbedingt immer weiter funktionieren, ist klar...
Warum benutzt du eigentlich nicht die normale Methode und rufst einfach ScaleBy auf? Da musst du nicht tricksen und die Methode wird offiziell unterstützt. Einzig für ein TPageControl funktioniert diese in Delphi 10.1 nicht:
https://quality.embarcadero.com/browse/RSP-14750