2006-12-04

将 TListBox 列表项目显示成多列

Delphi 的 TListBox 控件可显示一个列表项目集合在一个可滚动的列表中。
根据设计,一个列表框显示他的列表项目在一列中。
如果你想要在一行上显示多个项目,从而让一个列表框拥有多个列,你可以使用下面的方法:

设置 TabWidth 属性。该属性用像素值指定列宽。
当你在列表框中添加项目的时候,用“^I”分隔列,也就是大写的“i”,像下面这样:
begin
ListBox1.Items.Add('First'^I'Second'^I'Third') ;
ListBox1.Items.Add('C1R1'^I'C2R1'^I'C3R1') ;
ListBox1.Items.Add('C1R2'^I'C2R2'^I'C3R2') ;
ListBox1.Items.Add('C1R3'^I'C2R3'^I'C3R3') ;
ListBox1.Items.Add('C1R4'^I'C2R4'^I'C3R4') ;
ListBox1.Items.Add('C1R5'^I'C2R5'^I'C3R5') ;
ListBox1.Items.Add('C1R6'^I'C2R6'^I'C3R6') ;
ListBox1.Items.Add('C1R7'^I'C2R7'^I'C3R7') ;
ListBox1.Items.Add('C1R8'^I'C2R8'^I'C3R8') ;
ListBox1.Items.Add('C1R9'^I'C2R9'^I'C3R9') ;
end;


原文名称:Show TListBox Items in Multiple Columns
原文地址:http://delphi.about.com/cs/adptips2000/a/bltip1200_3.htm

没有评论: