Re: 256 color HIcon -> TimageList = ugly bitmap?

Article View: borland.public.cppbuilder.nativeapi

Article #5255

Back to borland.public.cppbuilder.nativeapi Previous Next

#5255

From: boost
Date: Wed, 21 Sep 2005 23:13

32 lines
1918 bytes

borrowed from google:

procedure ConvertTo32BitImagelist(Imagelist: TImagelist);
var
   TmpList: TImagelist;
begin
   if Imagelist <> nil then
   begin
     TmpList := TImagelist.Create(nil);
     try
       TmpList.Assign(Imagelist);
       with Imagelist do
         Handle := ImageList_Create(YourWidth, YourHeight, ILC_COLOR32 or ILC_MASK, 0, 4);
       Imagelist.AddImages(TmpList);
     finally
       TmpList.Free;
     end;
   end;
end;

boost

JD wrote:
> boost <boost@boostnetwork.net> wrote:
> 
>>solved, just in case anybody searches the thing was to add XP manifest to the project and convert the imagelist to 32Bit
> 
> 
> Share the code?
> 
> ~ JD
>

Technical Details

Message-ID: <4331e8af$1@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newscon06.news.prodigy.com!newscon02.news.prodigy.com!prodigy.net!nx01.iad01.newshosting.com!newshosting.com!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail

References: <43307111$1@newsgroups.borland.com> <43307cf4$1@newsgroups.borland.com> <4330f1bf$1@newsgroups.borland.com>

Show Full Headers

Complete Article Headers

X-Google-Thread: 10cc67,920d355696b18360
X-Google-Attributes: gid10cc67,public
X-Google-Language: ENGLISH,ASCII-7-bit
Date: Thu, 22 Sep 2005 01:13:20 +0200
From: boost <boost@boostnetwork.net>
User-Agent: Mozilla Thunderbird 1.0.6 (Windows/20050716)
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: borland.public.cppbuilder.nativeapi
Subject: Re: 256 color HIcon -> TimageList = ugly bitmap?
References: <43307111$1@newsgroups.borland.com> <43307cf4$1@newsgroups.borland.com> <4330f1bf$1@newsgroups.borland.com>
In-Reply-To: <4330f1bf$1@newsgroups.borland.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
NNTP-Posting-Host: 83.58.118.161
Message-ID: <4331e8af$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1127344303 83.58.118.161 (21 Sep 2005 16:11:43 -0700)
Lines: 32
Path: arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newscon06.news.prodigy.com!newscon02.news.prodigy.com!prodigy.net!nx01.iad01.newshosting.com!newshosting.com!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail

Reply to Parent Message