TCustomTreeViewのOnCustomDrawイベントが設定できません。
procedure DrawTreeItem(Sender: TCustomTreeView; ARect: TRect; var DefaultDraw: Boolean);
という宣言では型が違うと注意されます。
どこが間違いなのかご指摘いただければと思います。
ドコ落としたんかいな〜ダレか、const見んかったか?
何でかわかりませんが、TCustomTreeViewこを継承したコンポーネントで、オブジェクトインスペクタのOnCustomDrawをダブルクリックしたときはうまく動きました。
このときの名前の手続きを宣言したところうまくいきました。
まったく意味がわかりません。
×procedure DrawTreeItem(Sender: TCustomTreeView; ARect: TRect; var DefaultDraw: Boolean);
○procedure DrawTreeItem(Sender: TCustomTreeView; const ARect: TRect; var DefaultDraw: Boolean);
どこが違うか、分かるね。
あ〜、constですか。
気づかなかった...
どうもありがとうございます。
ヘルプも完全に当てにするのは良くないみたいですね。
ツイート | ![]() |