| 订阅 | 在线投稿
分享
 
 
 

如何取得Memo的行和列

来源:互联网  宽屏版  评论
2008-06-01 01:54:58

新建一个应用,在窗体Form1上添加两个Tlabel组件名为Label1,Label2;

添加两个Tbutton组件名为Button1,Button2;添加一个Tmemo组件名为Memo1。

然后在代码编辑器中添加以下代码。

void __fastcall TForm1::Button1Click(Tobject *Sender)

{

Label1→Caption=SendMessage(Memo1→Handle,EM_LINEFROMCHAR,-1,0)+1;

}

void __fastcall TForm1::Button2Click(Tobject *Sender)

{

Label2→Caption=Memo1→SelStart-SendMessage(Memo1→Handle,EM_LINEINDEX,-1,0)+1;

}

这种方法同样适用于RichEdit。

 
  新建一个应用,在窗体Form1上添加两个Tlabel组件名为Label1,Label2; 添加两个Tbutton组件名为Button1,Button2;添加一个Tmemo组件名为Memo1。 然后在代码编辑器中添加以下代码。    void __fastcall TForm1::Button1Click(Tobject *Sender)    {    Label1→Caption=SendMessage(Memo1→Handle,EM_LINEFROMCHAR,-1,0)+1;    }    void __fastcall TForm1::Button2Click(Tobject *Sender)    {    Label2→Caption=Memo1→SelStart-SendMessage(Memo1→Handle,EM_LINEINDEX,-1,0)+1;    }    这种方法同样适用于RichEdit。
󰈣󰈤
 
 
 
>>返回首页<<
 
 热帖排行
 
 
 
静静地坐在废墟上,四周的荒凉一望无际,忽然觉得,凄凉也很美
©2005- 王朝网络 版权所有