int LineIndex=0,LineNum=0,SelStar=0,ColNum=0;
LineNum = ::SendMessage(Form5->RichEdit1->Handle,EM_LINEFROMCHAR,(WPARAM)-1,0);//行数
LineIndex = ::SendMessage(Form5->RichEdit1->Handle,EM_LINEINDEX,(WPARAM)-1,0);
SelStar = (int)LOWORD(::SendMessage(Form5->RichEdit1->Handle,EM_GETSEL,NULL,NULL));
ColNum = SelStar - LineIndex; //列数
获取文本框的行数和列数
最新推荐文章于 2021-08-01 00:57:01 发布