1。 为ListBox添加水平方向的滚动条
SendMessage (ListBox1-Handle,LB_SETHORIZONTALEXTENT,ListBox1-Width + 32,0) ;
2。 为Listbox添加图标
首先需要设置Listbox的Style属性为lbOwnerDrawVariable;
const margin = 2 ; // Margin around each bitmap
//---------------------------------------------------------------------------
void __fastcall TForm1::ListBox1MeasureItem(TWinControl *Control, int Index,
int &Height)
{
Height = ImageList1-Height + margin * 2 ;
}
//----------------------------------------------...[ 查看全文 ]