掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
FireMonkey の 3D Object をコードで記述したい (ID：45857)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
まず Dummy と Cube(Object) だけで試してみました。 FireMonkey 3D で新規作成します。 フォームに Light と LightMaterialSource を配置します。 フォームをダブルクリックして、uses 節に FMX.Objects3D を手入力で追加します。 procedure と begin の間に、Dummy と Cube を以下のように定義します。 begin と end の間に以下のように書きました。 コンパイルはとおったのですが、Cube が表示されません。 何がいけないのでしょうか。 詳しい方がいらっしゃいましたらご指導の程よろしくお願い致します。 使用環境 Delphi XE5 Pro Update2 Win7 Pro 64bit SP1 procedure TForm1.Form3DCreate(Sender: TObject); var Img_Dummy,Img_Cube: TControl3D; begin Img_Dummy := TDummy.Create(nil); Img_Cube := TCube.Create(nil); Img_Cube.Parent := Img_Dummy; TCube(Img_Cube).MaterialSource := LightMaterialSource1; Img_Cube.SetSize(2, 2, 2); Img_Cube.Position.Point := Point3D(1, 1, 1); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.