TJvListView: Eintrag wird nicht fokusiert

**Reinhardtinho**

Hallo zusammen,

Ich habe bei meinem Programm ein Problem festgestellt und dieses mal in einem einfachen Beispiel überprüft.
Dort tritt das Problem auch auf.

Mit folgendem Code, füge ich zwei Zeilen in ein ListView ein (vsReport).

zusammenfalten · markieren

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);

  end;

  ListItem.Selected := True;

  ListItem.Focused  := True;

end;

Wenn ich auf den Button klicke, wird aber der erste Eintrag fokusiert und nicht der zweite. (Fall1)
Klicke ich erneut drauf, wird der vierte fokusiert, also so, wie es sein soll. (Fall2)

Ist jemand in der Lage, dieses Problem zu lösen und bereit mir dabei zu helfen?

Vielen Dank und MFG
Lorenz

Anbei das Beispiel noch mal in Bildform. Für Fall 1 und Fall 2.

[Edit]Im Titel TListView durch TJvListView ersetzt. Scheint Sonderfall zu sein.[/Edit]

TJvListView: Eintrag wird nicht fokusiert

TJvListView: Eintrag wird nicht fokusiert

Forumregeln