TScrollBox, VerticalScrollbar, Range

[itblumi]

Das TCanvas besitzt eine Funktion TextHeight so kannst du die tatsächliche höhe des Textes ermitteln.

[BerndS]

Zitat:

Das TCanvas besitzt eine Funktion TextHeight so kannst du die tatsächliche höhe des Textes ermitteln.

Leider ignoriert diese Funktion #13#10 und gibt nur die Höher einer Zeile zurück. Hat man mehrer Zeilen muss man dann noch das Result damit multiplizieren.
Ich würde mir mal bei diesem für uns unbekannten Panel die Methode anschauen, die den Text ausgibt (sofern die Quellen vorhanden sind) oder mal in die Quellen von TCustomLabel reinschauen.
TCustomLabel kann Wordwrap und Autosize.

[itblumi]

Die Funktion TextRect besitzt als 3. Parameter die TextFormat damit kann man Wordwrap und andere Formatierungen bestimmen.

https://docwiki.embarcadero.com/Libr...anvas.TextRect

Unter Windows wird hier für die MSDN Funktion DrawText oder DrawTextEx benutzt https://learn.microsoft.com/en-us/wi...nuser-drawtext. Delphi macht hier nichts weiter als das format in das TTextFormat um zu wandeln.

[Alex_ITA01]

Ok, ich gucke mal wie ich das hinbekomme. Ist keine eigene Komponente das Panel.
Ich brauch ja die tatsächliche Texthöhe, nicht die Texthöhe von dem aktuell sichtbaren Teil, damit ich den Scrollbereich entsprechend einstellen kann. Danke