社区
C++ Builder
帖子详情
怎么知道TMemo的当前行?
wjm2000
2001-06-07 05:04:00
即我想当在一个MEMO中加入一行时马上把它写到一个文件中去!
...全文
114
3
打赏
收藏
怎么知道TMemo的当前行?
即我想当在一个MEMO中加入一行时马上把它写到一个文件中去!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
years
2001-06-08
打赏
举报
回复
列=SendMessage(Memo1→Handle,EM_LINEFROMCHAR,-1,0)+1;
行=Memo1→SelStart-SendMessage(Memo1→Handle,EM_LINEINDEX,-1,0)+1;
当然同样也适用于TRichEdit控件.
夭夭
2001-06-07
打赏
举报
回复
新建一个应用,在窗体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;
}
NowCan
2001-06-07
打赏
举报
回复
int Row=SendMessage(RichEdit1->Handle,EM_LINEFROMCHAR,RichEdit1->SelStart,0);
Delphi 7.0 得到Memo中的可见
行
数.rar
function LinesVisible(Memo:
TMemo
): integer; Var OldFont : HFont; Hand : THandle; TM : TTextMetric; Rect : TRect; tempint : integer; begin Hand := GetDC(Memo.Handle); try ...
Delphi保存窗体全部信息
主要代码放在Project1.dpr中。 生成窗体的时候先加载程序根...程序结束时保存
当前
窗体的装他到FormData.Dat。 保存的窗体资源涵盖很多,例如窗体中
TMemo
的内容,TImage的图片,每个控件(包括窗体本身)的位置大小。
Delphi开发技巧之-文件操作
在
TMemo
光标位置插入一个文件 在Windows开始后自动运
行
一个程序 在应用程序中添加Exe文件并且执
行
在文件中搜索字符串 在文件中搜索指定文本 在文本文件中搜索文本 将剪贴板复制到流和恢复 将文本文件赋值给一个字符...
delphi通用函数单元一
{* 单
行
文本转多
行
('\n'转换
行
符)} function Encrypt(const S: String; Key: Word): String; {* 字符串加密函数} function Decrypt(const S: String; Key: Word): String; {* 字符串解密函数} function varIIF...
Delphi开发范例宝典目录
实例085 TStringGrid自动移动及增加
行
104 2.8 其他控件应用典型实例 105 实例086 TTrackBar的简单应用 105 实例087 TSplitter的应用 106 实例088 TMaskEdit组件的简单应用 107 实例089 TMonthCalendar...
C++ Builder
13,826
社区成员
102,678
社区内容
发帖
与我相关
我的任务
C++ Builder
C++ Builder相关内容讨论区
复制链接
扫一扫
分享
社区描述
C++ Builder相关内容讨论区
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章