TListView: Fortlaufend untereinander Zeichen

[TheMiller]

Hallo,

ich zeichne in der ListView selbst. Ich habe bisher erreich, dass der Text in der 2. Spalte umgebrochen wird. Nun möchte ich gerne noch, dass der nächte Datensatz entsprechend tiefer anfängt, damit sich beide Einträge nicht überlappen. Doch ich weis nicht so recht wie. Das ist mein Code

Delphi-Quellcode:

procedure TForm2.ListView1DrawItem(Sender: TCustomListView;
  Item: TListItem; Rect: TRect; State: TOwnerDrawState);
var
  height: Integer;
  i: Integer;
begin
  ListView1.Canvas.FillRect(Rect);

  //Höhe des Textes merken mit DT_CALCRECT!
  height:=DrawText(ListView1.Canvas.Handle, PChar(Item.Caption), Length(Item.Caption), Rect, dt_calcrect or dt_wordbreak);
  //Höhe anpassen
  rect.Bottom:=NextYPos+rect.Top+height;
  //Text zeichnen
  DrawText(ListView1.Canvas.Handle, PChar(Item.Caption), Length(Item.Caption), Rect, dt_wordbreak);

  //Rechteck verschieben (Spalte 2)
  offsetrect(rect, rect.Right+10, 0);

  //Höhe berechnen und Text zeichnen
  Height:=DrawText(ListView1.Canvas.Handle, PChar(Item.SubItems[0]), Length(PChar(Item.SubItems[0])), Rect, DT_CALCRECT);
  rect.Right:=230;
  rect.Bottom:=rect.Top+(2*Height);
  NextyPos:=NextYPos+rect.Bottom+10;
  DrawText(ListView1.Canvas.Handle, PChar(Item.SubItems[0]), -1, Rect, DT_WORDBREAK);

  //
  offsetrect(rect, 0, NextYPos);

Ich dachte daran, eine globale Variable zu setzen (NextYPos) und da dann weiter zu zeichnen. Ich nehme an, dass diese Funktion für jeden Datensatz aufgerufen wird, sodass ich keine Schleife programmieren muss.

Btw: in der einen Zeile bei "rect.Right:=230" habe ich angegeben, wo die 2.Spalte beginnen soll. Das ist ja statisch. Wie könnte ich herausfinden, wie breit der Text aus Spalte 1 ist, sodass ich darauf nur noch beispielsweise 10px addieren muss?

Danke

[Namenloser]

Wenn es nicht so ein "OnMeasureItem"-Event wie bei der TListBox gibt, würde ich mir überlegen, eine andere Komponente zu benutzen, denn sonst wird es ziemliches Gewurschtel. Ich bin sicher, dass z.b. das VirtualTreeView sowas kann (habe noch nicht damit gearbeitet).

[TheMiller]

Eigentlich ist es relativ easy, aber egal wie ich das rect einstelle, die Texthöhe ergibt immer 13. Sonst könnt ich es ja manuell anpassen -> vorausgesetzt, die Funktion, die ich jetzt oben habe, ist relativ elegant...

[Namenloser]

Das Problem mit der globalen Variable ist, dass du nicht weißt, welches Item vorher gezeichnet wurde. Außerdem sind globale Variablen eben unschön - wenn dann eine Klasse ableiten, und dann die benutzen.