listview1中onchange事件不响应

[树上猪]

程序中添加了一个线程，然后listview1的onchange事件就无效了，但是删除线程后那么listview的onchange事件又有效了，所以怀疑是线程的影响，但不知原因，onchange下源码如下：
procedure TMainFrm.ListView7Change(Sender: TObject; Item: TListItem;
Change: TItemChange);
begin
if listview7.Items.Count>30 then
begin
listview7.Items.Delete(0);
end;
end;
Onchanging也不响应。

[s11ss]

线程都干啥了

[树上猪]

仅是理接收信息并将接收到人数据发送出去，然后通过这个listview7表显示接收与发送的数据，但不删除显示的部份，listview显示行数太多又影响效率也可能把程序挂掉，所以想在显示达到一定的记录时触发onchange事件实时删除

[树上猪]

这个应当是线程中虽由调用了listview但onchange事件并没有以窗体中发生，所以没有响应，但怎样让他们关联响应，不知有什么办法