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 )
Bug in TImageList
- AlexSchaft
- Posts: 172
- Joined: Fri Oct 07, 2005 1:29 pm
- Location: Edenvale, Gauteng, South Africa
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact: