如何取得Memo中光标的位置(指横纵坐标)???

Question

如何取得Memo中光标的位置(指横纵坐标)
因某种需求需获得memo中当前光标标的位置(光标的最上端或最下端都可)

Answer 1

begin
        edit1.Text:=inttostr(memo1.CaretPos.X);
        edit2.Text:=inttostr(memo1.CaretPos.Y);
end;

Answer 2

谢谢 yang6130(无限可能) 
不过偶说了,是相对于memo的横纵坐标

Answer 3

//uses shellapi
var
        pt:TPoint;
begin
        GetCaretPos(pt);
        edit1.Text:=inttostr(pt.x);
        edit2.Text:=inttostr(pt.Y);
end;