ListView, .TopItem; .Scroll

[Sebastian A]

Hallo,

Ich verwende eine mehrspaltige TListView im vsReport-Modus. Die Liste soll periodisch aktualisiert werden. Jedes Mal wenn ich die Liste neu aufbaue, springt der Scrollbalken wieder ganz nach oben.

Ich habe es so versucht:

<b>procedure TForm.ListView1Click(Sender: TObject);</b>
<b>var</b> TopItem: TPoint;
Name:String;
<b>begin</b>
topitem := listview1.TopItem.Position;
...
<b>end;</b>

<b>procedure TForm.Refresh;
begin</b>
...
ListView1.Scroll(topitem.x,topitem.y)
<b>end;</b>

Problem: Beim Auslesen von ListView1.TopItem.Position bekomme ich den Wert (2|19), unabhängig wie ich nach unten 'gescrollt' habe. Ich habe gesehen, dass es unterschiedliche Befehle zum Auslesen der Position des oberst angezeigten TListItem in der TListView gibt. Ich verwende die TListView mit <b>ViewStyle:=vsreport</b>.

Was tue ich falsch?

[Christian Seehase]

Hi Sebastian,<br><br>
schau mal bei<br>
<b>angewählte ListView-Position?</b><br>
in Delphi\VCL nach.<br>
Da hab' ich mich schon dazu geäussert.<br>
<br>
Ciao<br>
Chri