代码如下:
LineNum := SendMessage(richedit1.Handle,EM_LINEFROMCHAR,Memo1.SelStart,0);
ColNum:=SendMessage(richedit1.Handle,EM_LINEINDEX,LineNum,0);
LineNum := SendMessage(richedit1.Handle,EM_LINEFROMCHAR,Memo1.SelStart,0);
ColNum:=SendMessage(richedit1.Handle,EM_LINEINDEX,LineNum,0);
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货