TextHeight unter berücksichtigung von Word Wrap!

[sECuRE]

Hi,

ich benötige, um Autoscrolling zu gewähren, die Textgröße der zuletzt hinzugefügten Zeile eines (Jvcl)RichEdits. Momentan bekomme ich die via TextHeight * (TextHeight div RichEdit.Width) (damit auch Zeilen, die länger als 1 Zeile sind, berücksichtigt werden). Nun macht mir jedoch Word Wrap einen Strich durch die Rechnung - meine Methode, die Höhe zu holen kennt kein Word Wrap :(

Die Suche bei Google/Hier im Forum hat leider keine Ergebnisse unter dem Umstand Word Wrap gefunden..

Vielen Dank & cu

[choose]

Hallo aM0xACiLLiN,

sieh mal unter DrawText nach. Ein Aufruf der Art

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;

sollte funktionieren

[sECuRE]

Hi,

Danke für den Tipp! Das Problem war zwar ein anderes, das ich mittlerweile lösen konnte, aber der Code ist durchaus nützlich für andere Sachen :)

cu