0

実行時に Delphi XE2 で TViewPort3D - TLayout3D - TPlane - TCube クラスのオブジェクトを作成しました。

TViewPort3D > TLayout3D > TPlane > TCube が作成階層です。Layout3D を所有する Viewport3D など。

必要に応じて、BringToFront、Visible=True、X、Y、Z 位置、RotationAngles などのプロパティを段階的に変更しています。

また、フォームの左側に 1 つ、Firemonkey 3D フォームの右側に 1 つの 2 つの光源を追加し、回転角度を変更するスクロール バーを使用して、これらの作成されたオブジェクトに光が当たるようにしました。オブジェクトが作成されますが、FMX フォームに表示されません。

設計時にツール ボックスから同じオブジェクトを配置し、実行時にそれらを表示できます。ただし、ランタイムで作成されたオブジェクトは表示されません。

必要に応じて、コードも共有できます。

さらに読むためのヘルプやリンクは非常に役立ちます。前もって感謝します。

4

0 に答える 0