任意の3D表面データの描画（FMX）
解決ｙTakeです。
任意の3D表面データを半透明に描画したいと思います。
球や円筒などの規定の形状ではなく、例えばＣＴ等の各スライス面内の輪郭形状を積層してその表面形状を半透明に描画します。
TViewport3DにTModel3Dを載せて、そこに描画しようと思いましたが、描画ルーチンが見当たりません。
VCLの時の様な、描画対象である”canvas”的な物はあるのでしょうか？
先ず、"Polygon3D"の様な多角形描画ルーチンを用いれば輪切り上の描画を目指し、その後に輪切りの輪郭同士を繋ぐとワイヤーフレーム的な描画になりそうなのですが、、、
任意の多角形の描画の仕方をアドバイス頂ければと思います。
或いは、そもそも、TViewportやTModel3Dで任意の3D輪郭を描画する事は可能なのでしょうか？
別の実現方法がある様であれば、ご教示願いたく思います。
当方：
DELPHI XE6（FMX）
32bit Windows10
です。
yTakeです。
すみません。過去の自分の本欄への問い合わせでTViewport3Dでは任意描画できない事をご教授頂いていました。同じ質問になってしまいました。申し訳ありません。
データは三次元座標データの配列の繰り返しで、
一つのグループが、
１：（ｘ00、ｙ00、ｚ00），（ｘ01、ｙ01、ｚ01），（ｘ02、ｙ02、ｚ03）・・・（ｘ0n、ｙ0n、ｚ0n）
で、これが繰り返しで、
２：（ｘ10、ｙ10、ｚ10），（ｘ11、ｙ11、ｚ11），（ｘ12、ｙ12、ｚ13）・・・（ｘ1n、ｙ1n、ｚ1n）
・
・
・
ｍ：（ｘm0、ｙm0、ｚm0），（ｘm1、ｙm1、ｚm1），（ｘm2、ｙm2、ｚm3）・・・（ｘmn、ｙmn、ｚmn）
となっています。
ここで、各グループにおいて例えばｚ座標においてｚｉ0〜ｚｉnまでが同じ座標であれば単一平面を示し、他のｘ，ｙ座標で閉じた多角形を描画すると輪郭になります。
これをグループの数だけ繰り返すと輪切りデータが積層されそれらを繋げる？と３Ｄ表面描画となる様に考えています。
DELPHI XE6のFMXで出来ないとも思えません。
もう少し調査・試行錯誤してみます。
ご助言があればよろしくお願いします。
少しトライアンドエラーを繰り返してみました。
DEKOさんらのページでTImage3DがBitmapを内包している点が分かり試してみました。
DrawLineで直線を引いてみたのですが、何も表示されません。
試しにTImageを配置してそのBitmapへ同様にDrawLineしてみましたが、直線が引かれました。DrawLineの使い方やBitmapへの描画方法（BeginScene/EndSceneで挟む）などは間違っていない様に思えます。
そもそも、TImage3Dをフォーム上に配置してもそのオブジェクトが見えません。
ＩＤＥウィンドゥの構造のところにはツリー構造にImage3D1としてみつかります。通常のオブジェクトはツリー構造上で選択するとフォーム画面上でそのオブジェクトが選択表示されますが、Image3D1は見つかりません。
TImage3Dとはその様なものなのでしょうか？
このままトライアンドエラーを続けるべきか判断しかねています。
アドバイス頂ければ幸いです。
FMXの描画関係だと、ここではなく、中山さんか、MVPの細川さんが見ていそうなところ、
例えばDelphi-MLとかFBとかTwitterとかそのあたりで聞くといいと思います…。
あとは
https://www.embarcadero.com/jp/events-japan/tech-lab
こういうところで相談するか…。
通りすがりさん
ありがとうございます。
そうなんですね。
そちらも参考にしてみます。
3Dアプリケーションのフォーム
TForm1 = class(TForm3D)
でやってる？
AAAさん、閉じてしまったところでスミマセン。
FireMonkeyデスクトップアプリケーションの”HD FireMonkeyアプリケーション”を選択していました。
以前もこれで球やシリンダー等を３D表示する事が出来ていたもので、、、
TForm1 = class(TForm)
となっています。
| ツイート |  |