Außerdem solltest du den Code, den man hier postet nicht eigenmächtig abändern:
is TMainform
ist was anderes wie
is TForm
( hab ich leider vorhin übersehen)
parentForm hatte ich zu
TControl geändert
Zitat:
parentForm := (parentForm as TForm).Parent;
wird fehlschlagen wenn es sich nicht um eine Form handelt (was eigentlich immer der Fall ist, weil der Code ja nur ausgeführt wird, wenn das der Fall ist!)