Aktuelle Momoposition herausfinden

[Dax]

Mit CaretPos geht das ganz einfach:

Delphi-Quellcode:

var
  Pos: TPoint;
begin
  Pos := Memo1.CaretPos;
end;

Dann enthält Pos die Koordinaten des Schreibcursors, startet oben links mit 1, 1.