Re: More icon res in LV
- Posted by Dan Moyer <DANIELMOYER at prodigy.net> Jan 10, 2003
- 527 views
Chris, When I run your program under Win98 1st ed., I seem to get similar results, except I get the Windows flag instead of a picture of a window in the icon. Sent a pic in .doc of what I got direct to you. Dan Moyer ----- Original Message ----- From: <cafromsw at yahoo.com> To: "EUforum" <EUforum at topica.com> Subject: More icon res in LV > > I have been doing more research into my icon > resolution problem, mostly because I hate it when I > don't understand something and can't figure it out. I > have decided to inlcude a sample program and a > screenshot of the output on my computers. I tried it > on 5 WinME systems and a dual boot laptop with WinXP. > Here is the code I used for the screenshot: > > ---------------------------- > include win32lib.ew > > constant Win1 = createEx( Window, "LV Test", 0, > Default, Default, 400, 300, 0, 0) > > constant LV1 = createEx( ListView, {"Column 1"}, Win1, > 4, 10, 300, 100, > > or_all({LVS_REPORT,LVS_SHOWSELALWAYS}), 0) > > constant LV2 = createEx( ListView, {"Column 1"}, Win1, > 4, 120, 300, 100, > > or_all({LVS_REPORT,LVS_SHOWSELALWAYS}), 0) > > object OK > seq ic ic = {} > seq sq sq = {} > > ic &= addIcon(extractIcon({"shell32.dll",1})) > > -- disks04.ico is from win32lib\demo it contains, in > order, a 32x32 icon and a 16x16 icon > -- place in same directory as lv_test.exw > ic &= addIcon(extractIcon("disks04.ico")) > --ic &= addIcon(extractIcon({"disks04.ico", 1})) -- > appears to be same as above > --ic &= addIcon(extractIcon({"disks04.ico", 2})) -- > does not work > > -- disks04a.ico is just the 16x16 icon taken from the > above file > -- place in same directory as lv_test.exw > ic &= addIcon(extractIcon("disks04a.ico")) > > for i = 1 to 3 do > OK = addLVItem(LV1, ic[i], "test line" & sprint(i)) > sq = append(sq, {"test line" & sprint(i)}) > end for > > loadLVInfo(LV2, sq) > > WinMain(Win1, Normal) > > here is a link to the screen shot > http://home.attbi.com/~sea.star/pics/scr1.jpg > and here are the to icon files to make it easier for > anyone wishing to experiement > http://home.attbi.com/~sea.star/pics/DISKS04.ICO > http://home.attbi.com/~sea.star/pics/DISKS04a.ico > > To the left is my test program with ListViews and to > the right is an Explorer set to View-Details. > > Test line 1 is the icon pulled from shell32.dll and > should match lv_test.exw.zzz (is it possible that > there is a 32x32 and 16x16 pair in shell32.dll and I > am getting the first of the pair?) It also looks like > the fist pixel line isn't being drawn. > > Test line 2 in the icon pulled with > ic &= addIcon(extractIcon("disks04.ico")) > and should match either of the .ICO files. Again it > looks like I am getting the first of a 32x32 and 16x16 > pair. This also looks like the first line isn't being > drawn. > > Test line 3 was pulled from an .ICO file with just a > 16x16 icon in it. It now looks like the 16x16 icon > but still appears 'out of focus' as if it is being > masked slightly or maybe drawn over itself but offset > by one pixel. > > Does anyone else get these or similar results with > ListViews? Am I one the right track in thinking that > it is an extractIcon or imageList kind of problem. > > Thanks again, sorry for the long post. Chris > cafromsw at yahoo.com > > > > TOPICA - Start your own email discussion group. FREE! >