高見知英のかいはつにっし(β)

高見知英のアプリケーション開発日誌 のほか、地域活動などの活動報告ブログ。

仮想リストボックスコンポーネント 補足

 30日の仮想リストボックスのことで補足
http://d.hatena.ne.jp/TakamiChie/20040930#p2
更新にRefreshメソッドなどを用意して

Self.Count := FileList.Count;

などとすると書きましたが、実際はこの前に

if Style in [lbVirtual, lbVirtualOwnerDraw] then 

 それから、ファイルリストを表示するとなると、当然ShellChangeNotifierなどを使って表示中ディレクトリの監視などを行いたくなるでしょうが…。
ShellChangeNotifier.Rootは、ロード中に読み込もうとすると読み込み違反でエラーになるようです。
フォームのLoadedをオーバーライドして、それ以前にRootを変更することがないように対処すべきでしょう。これらはヘルプがないしやりづらいなぁ…(^_^;)