...dennoch zeichnet er nichts !
Schreibe im Konstruktor bitte folgendes:
LabelingStyle := lbsLines;
Zur Zeit steht dort lbsLabels und das kann ja natürlich nicht funktionieren, weil das Zeichnen für FLabelingStyle = lbsLabels noch nicht implementiert ist!
Übrigens ist das die schlimmste Quelltext-Formatierung aller Zeiten!!!