Hallo,
@marabu: auch eine Möglichkeit, je nachdem was man mit der Berechnung bezweckt.
@Achim: Aufrufen kann man die Funkion von
Flocke z.B. so:
Delphi-Quellcode:
var aPoint : TPoint;
begin
aPoint := GetRichEditTextExtent(RichEdit.Handle,0,True,False);
showmessage(IntToStr(aPoint.x)+' x '+IntToStr(aPoint.y));