Delphi Wie Punkte hinter ListView Eintraegen abschneiden?

Thema durchsuchen

Ansicht

Themen-Optionen

Wie Punkte hinter ListView Eintraegen abschneiden?

Ein Thema von Mackhack · begonnen am 17. Apr 2006 · letzter Beitrag vom 23. Apr 2006

Vorheriger Beitrag

Nächster Beitrag

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge

Re: Wie Punkte hinter ListView Eintraegen abschneiden?

17. Apr 2006, 20:36

Eigentlich finde ich die Ellipsis am Ende des abgeschnittenen Textes korrekt - aber vielleicht hilft dir das hier weiter:

markieren

Delphi-Quellcode:

			procedure TDemoForm.ListViewCustomDrawItem(Sender: TCustomListView;

  Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);

var

  r: TRect;

begin

  r := Item.DisplayRect(drLabel);

  Sender.Canvas.TextRect(r, r.Left + 2, r.Top + 2, Item.Caption);

  DefaultDraw := false;

end;

Grüße vom marabu