TJvListView: Eintrag wird nicht fokusiert

[Reinhardtinho]

Hab nochmal ein bisschen rumgetestet, mit einem Application.ProcessMessages klappt es soweit:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  i : Integer;
  ListItem : TListItem;
begin
  for i := 0 to 1 do
  begin
    ListItem := JvListView1.Items.Add;

    ListItem.Caption := IntToStr(i);
    Application.ProcessMessages;
  end;

  ListItem.Selected := True;
  ListItem.Focused  := True;
end;

MFG
Lorenz