OpenEuphoria

RE: still gotta problem with listview

• Posted by Jerry Story <jstory at edmc.net> Jul 19, 2003
• 461 views

> Is this a bug:
> in my code?
> in Win32lib?  (version 0.59.1  8/June/2003)
> in Windows NT4?
> 
> -------------
> include win32lib.ew
> 
> constant Win =
> create( Window, "Listview on TabControl Problem",0,1,1,550,500,0),
>  tc = create(TabControl,"",Win,20,40,500,500,0 ),
>  tab1 = create(TabItem,"tab 1",tc, 0, 0, 0, 0, 0 ),
>  lv1 = create( ListView,{"column 1","column 2","column 
> 3"},tab1,5,30,450,300,
>     or_all({LVS_REPORT,LVS_SHOWSELALWAYS})),
>  tab2 = create(TabItem,"tab 2",tc, 0, 0, 0, 0, 0 ),
>  lv2 = create( ListView,{"column 1","column 2","column 
> 3"},tab2,5,30,450,300,
>     or_all({LVS_REPORT,LVS_SHOWSELALWAYS}))
> 
> object index
> 
> index = addLVItem( lv1, 0, {"apple juice","orange juice","grapefruit 
> juice"})
> index = addLVItem( lv2, 0, {"apples","oranges","grapefruits"})
> 
> WinMain(Win,Normal)
> -----------

I solved this problem in an amateurish way by destroy() -ing the 
listviews on the close event.

Now Diet Monger Ass Kicker, Windows version is starting to look more 
decent, now that it has listviews instead of simple lists.
http://www.edmc.net/~jstory/DMAK.ZIP


Jerry Story