发什么消息可以向Tmemo添加一行文本?

[dreamgoal]

我找了很长时间也没找到.

[windindance]

Memo.Lines.Insert

[lsh124]

用它的lines.add(s:string)属性方法就解决了！

[dreamgoal]

谢谢你们的回复。

但是我需要Postmessage（），所以我需要知道发送那条消息可以给Tmemo添加一行文本？

[windindance]

我只知道用WM_GETTEXT取得文本，再用WM_SETTEXT设置文本。

[ihihonline]

先获得memo的句柄；
然后，发就可以了；

[Cipherliu]

TMemo不是标准的SDK控件，没有这样的消息可用吧。
不过你可自己定义一个消息，在其中处理就可以了。

[xzgyb]

这是Memo1.Lines.Insert的源代码

procedure TMemoStrings.Insert(Index: Integer; const S: string);
var
SelStart, LineLen: Integer;
Line: string;
begin
if Index >= 0 then
begin
SelStart := SendMessage(Memo.Handle, EM_LINEINDEX, Index, 0);
if SelStart >= 0 then Line := S + #13#10 else
begin
SelStart := SendMessage(Memo.Handle, EM_LINEINDEX, Index - 1, 0);
if SelStart < 0 then Exit;
LineLen := SendMessage(Memo.Handle, EM_LINELENGTH, SelStart, 0);
if LineLen = 0 then Exit;
Inc(SelStart, LineLen);
Line := #13#10 + s;
end;
SendMessage(Memo.Handle, EM_SETSEL, SelStart, SelStart);
SendMessage(Memo.Handle, EM_REPLACESEL, 0, Longint(PChar(Line)));
end;
end;

[xzgyb]

TMemo也是"EDIT"类型的控件
它的TStrins类型的Lines
在TMemo的构照函数执行时被实例化为TMemoStrings
其他的ComboBox,ListBox也类是
TComboBoxStrings,TListBoxStrings
由这些TStrings的派生类来包装这些消息

[Dozemin]

Memo是标准的EDIT控件，楼上的，你也学习API了。
我知道一点点，，，二楼的，代码应该没问题，我没写过，我喜欢用Delphi提供的方便方法