📄 d2.htm
字号:
<html>
<head>
<title>如何取得Memo的行和列</title>
<meta http-equiv="目录类型" content="文本/html; 字符集=gb2312">
</head>
<body bgcolor="#FFFFFF">
<table width="100%" border="0" height="285">
<tr>
<td height="35">
<div align="center" class="p14"><font color="#000000">
如何取得Memo的行和列</font></div>
</td>
</tr>
<tr valign="top">
<td> 新建一个应用,在窗体Form1上添加两个TLabel组件名为Label1,Label2;<br>
添加两个TButton组件名为Button1,Button2;添加一个TMemo组件名为Memo1。<br>
然后在代码编辑器中添加以下代码。<br>
void __fastcall TForm1::Button1Click(TObject *Sender)<br>
{<br>
Label1→Caption=SendMessage(Memo1→Handle,EM_LINEFROMCHAR,-1,0)+1;<br>
}<br>
<br>
void __fastcall TForm1::Button2Click(TObject *Sender)<br>
{<br>
Label2→Caption=Memo1→SelStart-SendMessage(Memo1→Handle,EM_LINEINDEX,-1,0)+1;<br>
}<br>
这种方法同样适用于RichEdit。</td>
</tr>
</table>
<br>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -