您所在位置：主题：在bcb中如何获取memo中光标所在当前行号:已解决
parkchang
[专家分：0] 发布于 2010-12-07 12:46:00
在bcb中如何获取memo中光标所在当前行号
在一个新FORM上，加一个Memo1,加一个Edit1后，在Memo1的OnClick事件里加Memo1Click文字后，写下下面的代码就行。
//---------------------------------------------------------------------------
void __fastcall TForm1::Memo1Click(TObject *Sender)
{
Edit1->Text=IntToStr(SendMessage(Memo1->Handle, EM_LINEFROMCHAR, Memo1->SelStart, 0));
}
//---------------------------------------------------------------------------
在一个新FORM上，加一个Memo1,加一个Edit1后，在Memo1的OnClick事件里加Memo1Click文字后，写下下面的代码就行。
//---------------------------------------------------------------------------
void __fastcall TForm1::Memo1Click(TObject *Sender)
{
Edit1->Text=IntToStr(SendMessage(Memo1->Handle, EM_LINEFROMCHAR, Memo1->SelStart, 0));
}
//---------------------------------------------------------------------------