ListBox and ScrollBarHorizontal but without headers

[Denis Liard <denis dot liard at proxyconcept dot net>]

Hello,
I have created a listbox. In the code I change somes properties :

 listlst.Visible=TRUe
 listlst.scrollBarHorizontal=true
 listlst.scrollbarvertical=true
 listlst.hasHeading=true
 listlst.columncount=9
 listlst.heading(-1)="X"+tab+"Prop"+etc.....
 listlst.columnwidths="24,10,24,120,170,200,155,100,100"
 listlst.selectionType=1
 listlst.defaultRowHeight=18

I populate this listBox from sql like :

SQLSTATEMENT ...

 while not rs.eOF
   listlst.addrow ""
   listlst.celltype(listlst.lastIndex,0)=2 // Checkbox
   listlst.celltag(listlst.lastIndex,0)=rs.idxfield(3).integerValue   
   listlst.cell(listlst.lastIndex,1)=str(rs.idxfield(10).integerValue) 
   listlst.celltag(listlst.lastIndex,2)=str(rs.idxfield(9).integerValue) 
   listlst.cell(listlst.lastIndex,3)=rs.idxfield(11).stringValue  
   listlst.cell(listlst.lastIndex,4)=rs.idxfield(4).stringValue 
   listlst.cell(listlst.lastIndex,5)=rs.idxfield(5).stringValue  
   listlst.cell(listlst.lastIndex,6)=rs.idxfield(6).stringValue  
   listlst.cell(listlst.lastIndex,7)=rs.idxfield(7).stringValue  
   listlst.cell(listlst.lastIndex,8)=rs.idxfield(8).stringValue  
   rs.movenext
 wend


When i execute the code, the list box feel goog, but when the 
horizontall scrollbar is moved on the right, all columns move well but 
not the header.
I do not understand why....

I need help because I have other listbox in my app and they work fine.

thank's a lot.

Denis.

------------------------------------------------------------------------
Content filter ScanMX / Filtrage de contenu ScanMX
This e-mail is virus free / Ce message est sain de tout virus

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://www.realsoftware.com/listarchives/lists.html>