掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Direct2D PathGeometryのCreate方法を教えてください (ID:49358)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
polylineをdirect2Dを使って，（小数の座標値を使って）描こうと，下記のようなコードを書きましたが，エラーが出ます。 hr := Ifact.CreatePathGeometry(crv); のところでエラーが出るのですが，解決するにはどのようにすればよいのでしょうか。 この手の内容は，C++用にはたくさんあるのですが，Delphi用の解説はほとんどなくて困っています。 ============================================================== procedure CustomPolyline(points: array of TD2Dpoint2F); var iFact : Id2D1Factory; crv : ID2D1pathgeometry; isink : ID2D1GeometrySink; hr : Hresult; begin if length(points) = 0 then exit; hr := Ifact.CreatePathGeometry(crv); if not secceeded(hr) then exit; hr := crv.open(isink); if not secceeded(hr) then exit; isink.SetFillMode(D2D1_FILL_MODE_WINDING); isink.BeginFigure(points[0],D2D1_FIGURE_BEGIN_FILLED); isink.AddLines(@points[1],length(points)-1); isink.EndFigure(D2D1_FIGURE_END_Closed); isink.Close; （以下省略） ==============================================================
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.