void __fastcall TForm1::Button1Click(TObject *Sender)
{
    String s=Memo1->Lines->Strings[Memo1->CaretPos.y];
    ShowMessage(s.SubString(0,Memo1->CaretPos.x));
}
//---------------------------------------------------------------------------

위와같이 해보세요

주의할점은
메모장의 편집한계를 넘어가면 CaretPos가 이상하게됩니다.

그럼..



현사랑 님이 쓰신 글 :
: 안녕하세요
:
: 메모 컴포넌트에서 커서앞 문자열을 알아내는 방법이 있나요
:
: 메모장에 다음과 같은 문장이 있을때
:
: =============================
: 안녕하세여
: 볼란드포럼
: =============================
:
: "포럼" 앞에 커서가 놓였을때
:
: "볼란드" 라는 문자열을 얻고 싶습니다
:
: 미리 감사드립니다 ^^