Bug in TImageList

Post Reply
User avatar
AlexSchaft
Posts: 172
Joined: Fri Oct 07, 2005 1:29 pm
Location: Edenvale, Gauteng, South Africa

Bug in TImageList

Post by AlexSchaft »

Hi,

I don't think that oIcon should be in inverted comma's :)

Alex

METHOD AddIcon( oIcon ) CLASS TImageList

local oIco

if ValType( oIcon ) == "C"
if File( "oIcon" )
DEFINE ICON oIco FILENAME oIcon
else
DEFINE ICON oIco RESOURCE oIcon
endif
else
oIco = oIcon
endif

return ILAddIcon( ::hImageList, oIco:hIcon )
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Alex,

Fixed, thanks :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Post Reply