Delphi初学者问题之三

Question

Memo1.Lines.Text = '';
大部分操作都是通过LINES来的，它是一个TStrings属性。

Answer 1

首先要对memo进行自动清空可以用memo1.clear;操作就可以了。
对于其他memo还有很多用法。举几个例子
在memo中插入字符串（利用memo的selstart、seltext）
在memo中20个字符后面插入“你好”
memo1.selstart:=20;
memo1.seltext:='你好';
当然用下面一句也可以实现
memo1.SetSelTextBuf(pchar('你好')); 
利用memo可以实现翻页功能
sendmessage(memo1.handle,wm_vscroll,sb_pagedown,0)向下翻页
sendmessage(memo1.handle,wm_vscroll,sb_pageup,0)向上翻页
当然利用MEMO也可以实现其他的功能。

Answer 2

rongercao来抢分的吗？
人家只问了一个问题，你回答那么多。