listview1中onchange事件不响应
树上猪 2012-08-03 11:13:40 程序中添加了一个线程,然后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也不响应。