？简单ListBox有关问题 ？

？？简单ListBox问题 ？？
请问：
1.如何将ListBox刚添加的一条选中并置为焦点？
2.如何将当前置为焦点的ListBox条目删除，删除后前一条置为焦点？
[解决办法]
ListBox1.SetFocus;
ListBox1.Selected[ListBox1.Count-1] := true;
//-------------------------------------------------
ListBox1.DeleteSelected;
ListBox1.Selected[ListBox1.Count-1] := true;
[解决办法]
1. ListBox1.Selected[ListBox1.Count - 1] := True;
2. for i := 0 to ListBox1.Count - 1 do
    if ListBox1.Selected[i] then
    begin
      ListBox1.DeleteSelected;
      ListBox1.Selected[i - 1] := True;
      Break;
    end;
[解决办法]
测试了一下，楼上的很准确
用另一种方法也可以实现：
var i:Integer;
begin
i:=lst1.Items.Add('添加内容');
lst1.ItemIndex:=i;
end;
这样也可以添加一条选中当前添加的。