Delphi5 と manifest と Vista or 7 (ID:39367)

名前

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

本文 もしかして、TListView ならこの修正のことかな？ ソースがあるならComCtrl.pasを以下のように修正して、パスの通ったところに置く。 procedure TCustomListView.UpdateColumn(AnIndex: Integer); if FImageIndex <> -1 then fmt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES; ↓ if FImageIndex <> -1 then mt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES else mask := mask and not (LVCF_IMAGE);