如何使ListView只有横轴滚动条,而不是竖轴滚动条???急!!!

[Linux2001]

[Linux2001]

没有人知道吗？

[ghz2000]

不是有一个属性可以设置的吗？不知道是不是你的目的

[Linux2001]

什么属性？

[shuyi]

把ViewStyle属性改成vsReport

[ghz2000]

你只要将ListView1.viewstyle:=vsReport;试试

[Apollo47]

procedure TForm1.FormCreate(Sender: TObject);
var I, MaxWidth: integer;
begin
MaxWidth:=0;
for i:=0 to listbox1.Items.Count -1 do
if MaxWidth<Listbox1.Canvas.TextWidth(Listbox1.Items.Strings[i]) then
MaxWidth:=Listbox1.Canvas.TextWidth(Listbox1.Items.Strings[i]);
SendMessage(listbox1.handle,LB_SetHorizontalextent,maxWidth+2,0)
end;

[Triumph]

是将ListView1.viewstyle:=vsList