ScaleBy() und wieder die originale Größe zurücksetzen ?

[Delphiturbo]

Hallo

gibt es eine Möglichkeit die originale Grösse der Form und aller anderen Controlls nach dem ScalBy() wieder zu bekommen ?

Z.B. : ScaleBy(133, 100); // d.h. 133% vergrössern
Wie kann ich nun die Form wieder verkleinen ?

Mathematik ist einfach : ScaleBy(100 / 133, 100);
Das Problem, es wird nur Integer akzeptiert !