Application->MessageBox() im Form platzieren

[nav]

Hallo
wenn man eine MessageBox aufruft, erscheint diese immer in der Mitte
des Bildschirms. Sinnvoller wäre jedoch eine Platzierung in der Mitte
des Forms. Kennt jemand eine einfache Möglichkeit die Position festzulegen?

Danke für Hinweise
Jürgen

[Konsti]

Borland Hilfe schrieb:

Zu diesem Beispiel gehört eine Schaltfläche. Wenn der Benutzer darauf klickt, wird ein Meldungsfeld mit den Schaltflächen Ja, Nein und Abbrechen angezeigt.

void __fastcall TForm1::Button1Click(TObject *Sender)

{
  MessageDlgPos("Are you there?",mtConfirmation, TMsgDlgButtons() << mbYesNoCancel, 0, 200, 200);
};