マウスカーソルがあるモニターの画面中央にFormを表示する [C++Builer]

void __fastcall TForm1::FormShow(TObject *Sender)
{
    // アプリ起動時は、ウィンドウが表示される前に移動する
	MoveWindowToMonitorWhereMouseCursorIsLocated();
}

void __fastcall TForm1::FormResize(TObject *Sender)
{
    // 最小化状態から元に戻した時もウィンドウを移動する
    MoveWindowToMonitorWhereMouseCursorIsLocated();
}

//---------------------------------------------------------------------------
// 概要
//   マウスカーソルがあるモニターにウィンドウを移動する
//---------------------------------------------------------------------------
void TForm1::MoveWindowToMonitorWhereMouseCursorIsLocated()
{
	// マウスカーソルがあるモニターの作業領域座標・ RECT 構造体を取得する
	RECT rt = GetMonitorWorkRectFromCursor();

	// 自ウィンドウをモニターの中心に移動する
	Left = (rt.left + ((rt.right - rt.left) / 2)) - (Form1->Width / 2);
	Top = (rt.top + ((rt.bottom - rt.top) / 2)) - (Form1->Height / 2);
}

//---------------------------------------------------------------------------
// 概要
//   マウスカーソルがあるモニターの作業領域座標・ RECT 構造体を取得する
// パラメーター
//   なし
// 戻り値
//   RECT 構造体が返る。
//   成功：マウスカーソルがあるモニターの作業領域座標が入る。
//   失敗：含まれる値全てが 0 になる。
//---------------------------------------------------------------------------
RECT TForm1::GetMonitorWorkRectFromCursor()
{
	RECT emptyRect {0,0,0,0};

	// マウスカーソルの画面座標を取得する
	POINT point;
	if (GetCursorPos(&point) == 0)
		return emptyRect;

	// マウスカーソルの画面座標の在るモニターへのハンドルを取得する
	HMONITOR hMonitor = MonitorFromPoint(point, MONITOR_DEFAULTTOPRIMARY);

	// モニターハンドルからモニター情報を取得する。
	MONITORINFO monitorInfo;
	monitorInfo.cbSize = sizeof(monitorInfo);
	if (GetMonitorInfo(hMonitor, &monitorInfo) == 0)
		return emptyRect;

    // モニター情報に含まれている作業領域の座標を表す RECT 構造体を返す。
	return monitorInfo.rcWork;
}