아래 sysv님하고 저하고 거의 동시에..
이 게시판에 있는 거 같군요..
여하튼 메모의 현재 커서 위치를 구하는 것이..
잊어먹어서리..
몇 번째 라인인가를 표시하는 것이 아래 있으니..
한 번 직접 찾아 보세요..
그리고 알게 되면 저에게도 알려주세요^^
(그런 콤포넌트가 어디 있었는데..)

From 류..

---------

procedure TForm1.Button1Click(Sender: TObject);
Var
   iLineNumber : Integer;
begin
  iLineNumber:= SendMessage(Memo1.Handle,
                            EM_LINEFROMCHAR,
                            Word(-1),
                            0);
  ShowMessage(IntToStr(iLineNumber));
end