主题:[讨论]感觉
dodolon
[专家分:400] 发布于 2006-11-30 09:52:00
感觉本论坛上大多是初学者,提的问题大多很简单,在一般的书籍(非深入的)上都可找到答案。或者是问题的思路本身就不符合常规,有问题,也就是说按常规的方法处理就不复杂,问题往复杂方面想了。一些比较深的问题在本论坛中都难以得到解答。本人在此论坛上很少提问题,每次上来都是浏览一下帖子,回答几个典型一些的问题。当然也没有经常上来(前述是一个原因,另一个是时间问题)。
在此顺便提一个问题,希望有高手指点:ListView控件在ViewStyle为vsList时,当Item的Caption较长时总不能完全显示出来,变成前几个字加“...”的形式,有什么办法让它们完全显示出来,就象Wndows资源管理器中的右框一样,会根据文件名的长度自动调整?
回复列表 (共6个回复)
沙发
wealthy [专家分:1840] 发布于 2006-11-30 10:10:00
将其ListView1.MultiSelect:=True;
板凳
dodolon [专家分:400] 发布于 2006-11-30 10:30:00
谢谢,我试一下。不过我要的偏偏是不能多选,当然如果能解决所提问题,多选可以通过其他方式限制。
3 楼
wealthy [专家分:1840] 发布于 2006-11-30 10:54:00
ListView1.MultiSelect:=True;既可以显示隐藏字,也可以实现多选的.
4 楼
dodolon [专家分:400] 发布于 2006-11-30 13:59:00
我试了一下,不行啊。Item的Caption较长时仍是显示前几个字加“...”。注意:ViewStyle是vsList。
5 楼
wealthy [专家分:1840] 发布于 2006-11-30 14:20:00
是vsList;
我测试过了,是可以的,
我的Caption较达50个中文字,都可以的,查看你的代码,是否ListView1.MultiSelect另定义了.
6 楼
dodolon [专家分:400] 发布于 2006-11-30 18:33:00
解决了。不过与ListView1.MultiSelect属性无关。见以下代码,Button1Click不行,Button2Click就可以。感谢给我提示,再给10分。
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
//ListView1.Items.BeginUpdate;
ListView1.Clear;
for i:=0 to 15 do
ListView1.Items.Add.Caption:='这是ListView的Caption这是ListView的Caption';
//ListView1.Items.EndUpdate;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
i: Integer;
begin
ListView1.Items.BeginUpdate;
ListView1.Clear;
for i:=0 to 15 do
ListView1.Items.Add.Caption:='这是ListView的Caption这是ListView的Caption';
ListView1.Items.EndUpdate;
end;
我来回复