掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
カスタムコンポーネント：既存プロパティをカスタマイズするには (ID：34805)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
たとえば、TEditの背景色をEnabledの値にあわせて、灰色の表示にかえたいとします。 private { Private 宣言 } F_Enabled: boolean; procedure SetEnabledColor(const Value: boolean); published { Published 宣言 } property Enabled: boolean read F_Enabled write SetEnabledColor; procedure TEDIT.SetEnabledColor(const Value: boolean); begin F_Enabled: := Value; If Enabled Then Begin Color := $00FFFFFF; End Else Begin Color := $00E0E0E0; End; end; 上記のようにすると、背景色は変わりますが、本来のEnabledの機能が働かなくなってしまいます。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.