Ehrlich gesagt kann ich dir das nicht mehr wirklich sagen. Habe zwar gerade nochmal danach gesucht, aber das Code Snippet nicht mehr gefunden
Hat die Eigenschaft AutoSize bei dir nichts bewirkt?
Wenn nicht solltest du vielleicht doch die Möglichkeit von
DrawText in Betracht ziehen.
Hier mal einer kleiner Auszug auch hier aus dem Forum, der angeblich ein ähnliches Problem beschreibt/löst (nicht getestet):
Delphi-Quellcode:
myRect := Bounds(0,0, AWidth, 0);
DrawText(ACanvas.Handle, PChar(AString), Length(AString), myRect, DT_CALCRECT or DT_NOPREFIX or DT_WORDBREAK);
Result := myRect.Bottom;
Edit:
Ich hoffe mal, dass sich noch andere Leute melden, die dir vielleicht etwas zu dem Problem sagen können. Ich bin daran auch einmal fast verzweifelt, da ich die Höhe nicht mehr rausbekommen habe nachdem WordWrap aktiv war. Eine andere Lösung, wäre (wie ich sie schon öfters gelesen habe) ein Panel zu benutzen, und darin dann das Label zu zeichnen/einzufügen.