掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
FireMonkey の 3D Object をコードで記述したい (ID:45858)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Delphi FireMonkey 3D アプリケーションですね． ビジュアルなコンポーネントは Parent プロパティを設定しないと，表示場所が不定になってしまいます． Parent で指定するコントロールは，もちろん，ビジュアルでなければ当然見えません． 動作確認は，Widows 7 U64(SP1) + Delphi XE5(UP2) - FireMonkey 3D アプリケーション procedure TForm1.Form3DCreate(Sender: TObject); var Img_Dummy : TDummy; //ここも変更しました Img_Cube : TCube; begin //デフォルトの色だと画面で見えにくいので変更 LightMaterialSource1.Diffuse := TAlphaColorRec.Green; Img_Dummy := TDummy.Create(nil); Img_Cube := TCube.Create(nil); Img_Cube.Parent := Self; // ここを変更(Selfは，ここではForm1のこと) TCube(Img_Cube).MaterialSource := LightMaterialSource1; Img_Cube.SetSize(2, 2, 2); Img_Cube.Position.Point := Point3D(1, 1, 1); end; 他の方への参考です．(注: 今回のレス内容とは直接関係ありません) FireMonkey は Delphi のバージョンよって少し違うところがあります． 詳しくは，以下の記事を参考にしてください． [FireMonkey で使えるコンポーネントは？ [Delphi Programming]] http://ht-deko.minim.ne.jp/techf001.html
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.