einer Procedure Formulare als Parameter übergeben?

[sko1]

Hallo,

ich stehe auf dem Schlauch:
Ich benötige eine procedure, die die Größe und die Position eines Formulars festlegt.
Innerhalb des Forms ist das natürlich kein Problem, ich möchte aber ausgehend vom Hauptformular, dass jedes daraus angezeigte Unterformular die gleiche Position und Größe wie das aufrufende Formular hat.

Das kann ich als Procedure in jedem Formular einzeln machen, aber bei > 20 Unterformularen wäre das ja Unsinn, ich möchte eine "allgemeingültige" procedure haben, der ich das zu ändernde Unterformular übergebe und die ich dann aus allen Unterformularen aufrufen kann...

procedure Groesse(var f : TForm) geht nicht weil der ja TFormUnter1, TFormUnter2 etc. übergeben wird.

Wo habe ich den Knoten im Hirn?

Ciao
Stefan