delphi - Delphi の TCanvas で Google マップのようなマーカーを描画する

Question

私のアプリケーションでは、TCanvas に Google マップ マーカーのような「マーカー」を描画する必要があります (画像を参照)。

半径、高さ、原点をパラメータとして使用したいと思います。

使用するアルゴリズムについてはわかりません。円弧を使用して上部を描画できますが、下部を描画するにはどうすればよいですか? 注: GDI と GDI+ の両方で描画する必要があるため、どのような解決策も歓迎します。