Aufrufenden TFrame erkennen

[daywalker9]

Oder anstatt die Position selber zu errechnen:

  tm.Position := poOwnerFormCenter;