代码如下:
int ln, col;
ln = (int)::SendMessage(RichEdit1->Handle, EM_LINEFROMCHAR, -1, 0) + 1;
col = (int)::SendMessage(RichEdit1->Handle, EM_LINEINDEX, -1, 0) + 1;
Form1->StatusBar1->Panels->Items[2]->Text ="行"+IntToStr(ln)+",列"+IntToStr(RichEdit1->SelStart-col+2);
获取RichEdit控件行列信息代码
博客给出一段代码,通过SendMessage函数获取RichEdit1控件的行和列信息,将行号加1赋值给ln,列号加1赋值给col,最后将行列信息显示在Form1的StatusBar1的指定面板上。
2189

被折叠的 条评论
为什么被折叠?



