複数のコンポーネントで OnDrowItem イベントの処理を共通化するには?

解決


めるめる  2007-07-19 03:51:17  No: 27114  IP: [192.*.*.*]

いつもお世話になります。
フォームに複数の TComboBox (ComboBox1 〜 ComoBox10) を貼り付け、
各々 .Tag に 1 〜 10 をセットしています。

この方法で、OnClick, OnContextPopup, OnDropDown イベントは、
Tag の値を使用して処理を共通化できるのですが、
OnDrowItem イベントの引数に (Sender: TObject) がないため
TComponent(Sender).Tag が使用できません。

OnDrowItem でも処理を共通化できる方法がありましたら、
よろしくお願いします。
※どうもうまく表現できず、分かり難くて申し訳ありません。

編集    削除
Basser  2007-07-19 04:01:24  No: 27115  IP: [192.*.*.*]

第1パラメータの Control でいいのでは?

編集    削除
めるめる  2007-07-19 10:50:49  No: 27116  IP: [192.*.*.*]

Basser 様
Control.Tag を参照したらうまくいきました。
ありがとうこざいました。

編集    削除
めるめる  2007-07-19 10:51:18  No: 27117  IP: [192.*.*.*]

解決チェックを忘れました。

編集    削除