Letztes Leerzeichen im sichtbaren Bereich eines TEdit finden.

[Ydobon]

Eventuell

Delphi-Quellcode:

var pos: Integer;
    r: TRect;
begin
  Edit1.Perform(EM_GETRECT, 0, @r);
  pos:=Edit1.Perform(EM_CHARFROMPOS, 0, MakelParam(r.Right, 0));

liefert den Index des letzten Zeichens im Text. Dann einfach nur noch herunter zählen.