access private procedures

[Der schöne Günther]

Why did you make it private then? Private means private.

There is, however, a rather ugly way: You can declare a new subclass in your new unit and cast your object to that new subclass.