delphi中操作listbox

[eopenxie]

请问各位前辈
在窗体中加入listbox后，
添加了item之后。
我想操作它，比如我加入了。
1
2
3
4
5
这里我选取中1，一段时间后程序自己删除了1，2处于选中壮态。
这在delphi中如何操作呢？谢谢各位的指点！

[lliihhaaoo]

procedure TForm1.Button1Click(Sender: TObject);
begin
ListBox1.Items.Delete(0);
ListBox1.ItemIndex := 0;
end;

[eopenxie]

楼上的理解错了。我要他自动取焦到listbox的下一行,并执行onclick事件
procedure timer2 (sender : ttimer)
var i : integer
if edit1.txt = '可以了' then
i :=listbox1.itemindex();
listbox1.items.delete(i);
listbox1.onclick;//这里是否可行

[lliihhaaoo]

但是删除item后需要重新把ItemIndex付值的。不然就是无选择状态了。

[eopenxie]

对，所以当删了上一行之后，执行双击事件时，就会提示错误，怎么解决呢？

[eopenxie]

问题已解决。谢谢楼上的