为什么ListView1.Items.Insert(0)后新插入的ListItem没有显示在应有的位置？

ooolinux 2021-01-04 08:26:31

为什么ListView1.Items.Insert(0)后新插入的ListItem没有显示在应有的位置？
测试代码如下：

//---------------------------------------------------------------------------



#include <vcl.h>

#pragma hdrstop



#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

	: TForm(Owner)

{

    this->ListView1->ViewStyle=vsIcon;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

	TListItem *li;

	for(int i=1;i<=3;++i)

	{

		li=this->ListView1->Items->Add();

		li->Caption=L"add"+IntToStr(i);

	}

	li=this->ListView1->Items->Insert(0);

    li->Caption=L"insert0";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::ListView1Click(TObject *Sender)

{

    this->Caption=IntToStr(this->ListView1->ItemIndex);

}

//---------------------------------------------------------------------------

...全文

692 24 打赏收藏转发到动态举报

写回复

用AI写文章

24 条回复

切换为时间正序

请发表友善的回复…

发表回复

ooolinux 2021-01-20

打赏
举报

引用 21 楼早打大打打核战争的回复:

应该是xerox，施乐和苹果也是最早搞unicode的，早期unicode只是商业设计，还没有合并到ISO标准中

施乐公司，在中国不是很有名。

日立奔腾浪潮微软松下联想 2021-01-20

打赏
举报

应该是xerox，施乐和苹果也是最早搞unicode的，早期unicode只是商业设计，还没有合并到ISO标准中

ooolinux 2021-01-20

打赏
举报

引用 23 楼早打大打打核战争的回复:

[quote=引用 22 楼 ooolinux 的回复:][quote=引用 21 楼早打大打打核战争的回复:]应该是xerox，施乐和苹果也是最早搞unicode的，早期unicode只是商业设计，还没有合并到ISO标准中

施乐公司，在中国不是很有名。[/quote]

据说是复印机和激光打印机的发明者
[/quote] 有创新，有技术的企业，技术＞商业。

日立奔腾浪潮微软松下联想 2021-01-20

打赏
举报

引用 22 楼 ooolinux 的回复:

[quote=引用 21 楼早打大打打核战争的回复:]应该是xerox，施乐和苹果也是最早搞unicode的，早期unicode只是商业设计，还没有合并到ISO标准中

施乐公司，在中国不是很有名。[/quote]

据说是复印机和激光打印机的发明者

日立奔腾浪潮微软松下联想 2021-01-19

打赏
举报

引用 15 楼 ooolinux 的回复:

[quote=引用 14 楼早打大打打核战争的回复:]难道是因为图标的问题，不显示图标的vsList、vsReport模式都是正常的

技术上不是做不到，可能要考虑到16位Windows的电脑配置了。[/quote]

可能是早期windows中的设计遗留的问题，后来也就一直兼容下来了。我记得很早以前曾经看到过文章说早期windows中的GDI默认只建立5个DC给所有程序共用，如果程序不自己CreateDC的话，因为DC是一个很大的结构，大概有几百字节。不禁有点佩服微软，面向过程的程序设计方法，居然也能写出windows这么复杂的软件。

墨梅无痕 2021-01-19

打赏
举报

在 vsIcon 和 vsSmallIcon 条件下插入、删除内容，涉及到图标重绘的效率问题，所以请使用 TListItem.BeginUpdate 和 TListItem.EndUpdate 来操作。

ooolinux 2021-01-19

打赏
举报

引用 17 楼早打大打打核战争的回复:

[quote=引用 15 楼 ooolinux 的回复:][quote=引用 14 楼早打大打打核战争的回复:]难道是因为图标的问题，不显示图标的vsList、vsReport模式都是正常的

ooolinux 2021-01-19

打赏
举报

引用 17 楼早打大打打核战争的回复:

[quote=引用 15 楼 ooolinux 的回复:][quote=引用 14 楼早打大打打核战争的回复:]难道是因为图标的问题，不显示图标的vsList、vsReport模式都是正常的

ooolinux 2021-01-19

打赏
举报

引用 16 楼墨梅无痕的回复:

在 vsIcon 和 vsSmallIcon 条件下插入、删除内容，涉及到图标重绘的效率问题，所以请使用 TListItem.BeginUpdate 和 TListItem.EndUpdate 来操作。

TListItems 吧

ooolinux 2021-01-15

打赏
举报

引用 14 楼早打大打打核战争的回复:

难道是因为图标的问题，不显示图标的vsList、vsReport模式都是正常的

技术上不是做不到，可能要考虑到16位Windows的电脑配置了。

日立奔腾浪潮微软松下联想 2021-01-15

打赏
举报

难道是因为图标的问题，不显示图标的vsList、vsReport模式都是正常的

ooolinux 2021-01-14

打赏
举报

引用 12 楼 imisewer 的回复:

一直用vsReport模式的，一直没遇到过这个问题。。。。

不知道微软为什么这么做，不同模式区别对待

imisewer 2021-01-14

打赏
举报

一直用vsReport模式的，一直没遇到过这个问题。。。。

ooolinux 2021-01-07

打赏
举报

引用 10 楼早打大打打核战争的回复:

ViewStyle设置成vsList就是正常的

和vsIcon的表现不一致，不知道是微软的问题，还是VCL封装的问题。

日立奔腾浪潮微软松下联想 2021-01-07

打赏
举报

ViewStyle设置成vsList就是正常的

ooolinux 2021-01-06

打赏
举报

引用 8 楼早打大打打核战争的回复:

没有研究这个问题，可能跟listview内部存储的数据结构有关，也许用的是数组，不是链表？

搞不懂微软怎么弄的。

日立奔腾浪潮微软松下联想 2021-01-06

打赏
举报

没有研究这个问题，可能跟listview内部存储的数据结构有关，也许用的是数组，不是链表？

ooolinux 2021-01-06

打赏
举报

我发现删除一项也会留个空位置，不会自动排列图标。应该跟这个也有关。

ooolinux 2021-01-05

打赏
举报

引用 3 楼 tanqth的回复:


var
  I:Integer;
  vt:TListItem;
begin
  ListView1.Items.BeginUpdate;
  for I := 1 to 4 do
  begin
    vt:=ListView1.Items.Add ;
    vt.Caption:='t'+i.ToString;
  end;
  vt:=ListView1.Items.Insert(0);
  vt.Caption:='0000';
  ListView1.Items.EndUpdate;

加上BeginUpdate与EndUpdate，是可以的。

主要是，需要在不同的时间添加和插入项目。

tanqth 2021-01-05

打赏
举报


var
  I:Integer;
  vt:TListItem;
begin
  ListView1.Items.BeginUpdate;
  for I := 1 to 4 do
  begin
    vt:=ListView1.Items.Add ;
    vt.Caption:='t'+i.ToString;
  end;
  vt:=ListView1.Items.Insert(0);
  vt.Caption:='0000';
  ListView1.Items.EndUpdate;

加上BeginUpdate与EndUpdate，是可以的。

加载更多回复（4）