EditのEnabled=False処理で (ID:150120)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 回答いただいた皆様ありがとうごさいました。 まとめレスで失礼します。 結果として、以下の通りで対応しました。 1）is でクラスごとに分岐（できるだけ分岐を少なく） 2）TMyEdit=class(TCustomEdit)のような定義を、1）の分岐したクラス分、定義 条件の後出しではありますが、フォーム数、コントロール数が膨大なので、 新しいコンポーネントに入れ替えは、めんｄ（略） 間にプロパティを公開したクラスを挟むのは、ソース変更の手間としては楽なほうかと思いましたが、 最近の忘れ病で、いろいろ自信がなくなっているので、上記の方法で対応することにしました。 （間にクラス挟むなんて、余裕で忘れそう） > Colorが published で定義されているので > 実行時型情報(RTTI)を使えば型が異なっていても > プロパティ名経由で読み書き出来るかと思います。 なるほど！その発想はなかった！ でも、ほぼ経験がない部分なので、もう少し余裕のあるときにチャレンジしてみます。 めんどくさがりとか、忘れっぽいというオプションつきで、すいません。 これにて解決といたします。