Mega Code Archive
How to prevent your application from raising a AV with TListView under XP
<![CDATA[
Title: How to prevent your application from raising a AV with TListView under XP
procedure TCustomListView.UpdateColumn(AnIndex: Integer);
{...}
with Column, Columns.Items[AnIndex] do
begin
{ PATCH start:}
// mask := LVCF_TEXT or LVCF_FMT or LVCF_IMAGE;
mask := LVCF_TEXT or LVCF_FMT;
if FImageIndex = 0 then
mask := mask or LVCF_IMAGE;
{ PATCH :end }
{...}
end
]]>