Da gibts eigentlich nur zwei Möglichkeiten:

• Du nutzt ein TRichEdit, welches mit Textformatierungen umgehen kann
  
• Du zeichnest die Einträge in einer Listbox manuell (gibt dafür passende Ereignisse)

Wenn du den "Style" der ListBox auf "lbOwnerDraw*" stellst, wird für jedes Element der Liste das Ereignis "OnDrawItem" aufgerufen.
Dabei werden die Parameter "Rect" und "Index" mit der Position des Zeichenbereiches und dem Listenindex des Eintrages übergeben.

Mittels der Methode "ListBox->Canvas->TextRect(...)" zeichnest du einen Text (z.B. aus der Eigenschaft "ListBox->Items") in den Zeichenbereich.

Die optischen Eigenschaften der Zeichnung legst du über die Elemente von "ListBox->Canvas" fest (z.B. "Font" ).

Schau dir den Methodenkopf mal genauer an: Dort bekommst du das Rect übergeben

Ums Scrollen musst du dir keine Sorgen machen, das wird weiterhin von der ListBox verwaltet. Das Rect bezieht sich nur auf den jeweiligen Listeneintrag. Wenn dieser nach oben oder unten scrollt, wird das Rect angepasst.

Nen Quelltextausschnitt in Delphi habe ich nicht, nur einen in C++.

Nachtrag:
Ein TRect ist nichts anderes als eine Datenstruktur zur Beschreibung eines rechteckigen Bereiches. Dazu bietet es zwei Koordinatenpaare zur Beschreibung des oberen, linken und des unteren, rechten Punktes.