{"id":41,"date":"2007-05-08T15:32:26","date_gmt":"2007-05-08T13:32:26","guid":{"rendered":" http:\/\/www.nsonic.de\/blog\/2007\/05\/windowsxp-listview-error-with-xp-style-2\/"},"modified":"2007-05-11T19:42:42","modified_gmt":"2007-05-11T17:42:42","slug":"windowsxp-listview-error-with-xp-style-2","status":"publish","type":"post","link":"https:\/\/www.nsonic.de\/blog\/2007\/05\/windowsxp-listview-error-with-xp-style-2\/","title":{"rendered":"WindowsXP: ListView error with XP Style (2)"},"content":{"rendered":"<p><em>> Hi,<br \/>\n><br \/>\n> Having just installed Windows XP, I have tried to introduce the Theme look<br \/>\n> to our applications.  However I have noticed multi column listviews (in<br \/>\n> vsReport style) producing errors.  I have just scoured this newsgroups and<br \/>\n> there is mention of a fix (Steve Moss &#8211; Re: Windows XP?) though I can&#8217;t<br \/>\nseem<br \/>\n> to find it.<br \/>\n><br \/>\n> Can anybody shed some light on what it is I have to do to stop the access<br \/>\n> violations occurring?<br \/>\n<\/em><\/p>\n<p>Peter,<\/p>\n<p>in ComCtrls.pas, you have to change the implementation of<br \/>\nTCustomListView.UpdateColumn:<\/p>\n<p>Original lines are:<\/p>\n<p>[code lang=&#8221;delphi&#8221;]if FImageIndex <> -1 then<br \/>\n        fmt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES;<br \/>\n[\/code]<\/p>\n<p>Change this to:<\/p>\n<p>[code lang=&#8221;delphi&#8221;]if FImageIndex <> -1 then<br \/>\n        fmt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES<br \/>\nelse<br \/>\n        mask := mask and not (LVCF_IMAGE);[\/code]<\/p>\n<p>In Delphi 5 with Update Pack 1 this starts in line 13650 of ComCtrls.pas;<br \/>\nin Delphi 6 with Update Pack 1 it is line 15064.<\/p>\n","protected":false},"excerpt":{"rendered":"<p>> Hi, > > Having just installed Windows XP, I have tried to introduce the Theme look > to our applications. However I&hellip;<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"spay_email":""},"categories":[11],"tags":[75,80],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p71Tml-F","_links":{"self":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/41"}],"collection":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/comments?post=41"}],"version-history":[{"count":0,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/41\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/media?parent=41"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/categories?post=41"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/tags?post=41"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}