Delphi-PRAXiS - Delphi Owner-Draw-Problem bei TListView

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Owner-Draw-Problem bei TListView (https://www.delphipraxis.net/36181-owner-draw-problem-bei-tlistview.html)

Owner-Draw-Problem bei TListView

Hi,

Ich habe folgendes Problem, ich habe in einem Projekt eine TListView-Komponente verwendet, wobei ich alles mit Owner-Draw male, auch die Gridlines etc. Das Problem ist nun, wenn die letze Spalte zu groß wird und man scrollen muss, kann man den Text nicht mehr lesen:

Bild :wall:. Wenn ich .Repaint aufrufe, wird der ganze Text nicht verschoben, sondern wird einfahc so angezeigt wie wenn die scrollbar in der nullstellung (ganz links) is... Wenn ich die Position der Scrollbar wüsste könnte ich ja alles was ich mit Owner-Draw reinzeichne weng verschieben und alles is gut, aba weiß es nicht wie ich die auslesen soll... Habt ihr da vielleicht net Idee? Oder nen anderen Lösungsvorschlag?

Vielen Dank schoma,

Gruss, Jan.

Re: Owner-Draw-Problem bei TListView

So, mittlerweile hab ich das Problem selber gelöst :dancer: , wenn's intresiert:

1.) Man kann mit Rect.Top (in der DrawItem-Methode) wie die Scrollbar steht und damit dann seine ganze Zeichnung etwas verschieben und alles is gut *g*

2.) Mit GetScrollPos(List.Handle,SB_HORZ); kann man die Position der Scrollbar auch außerhalb der DrawItem-Methode auslesen.

Vielleicht kann's ja jemand brauchen...

Gruss, Jan.