◆◇◆用过indy组件的高手请进！！！！！！！◆◇◆

Question

欢迎你去www.myvc.net编程技术论坛  
你可以在那里交流编程技术  
注册用户请去以下帖子领分  
http://www.csdn.net/expert/topic/682/682036.xml?temp=.5972101  
http://www.csdn.net/expert/topic/681/681917.xml?temp=.5434992  
http://www.csdn.net/expert/topic/676/676074.xml?temp=.9520075  
http://www.csdn.net/expert/topic/641/641938.xml?temp=5.826968E-02

Answer 1

var
  strBody:String;
begin
  strBody := TIdText(Msg.MessageParts.Items  
                          [intIndex]).Body.Text;
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多，功能完备！★  浏览帖子速度极快！[建议系统使用ie5.5以上]。 ★  多种帖子实现界面。 
★  保存帖子到本地[html格式]★  监视您关注帖子的回复更新。
★  可以直接发贴、回复帖子★  采用XML接口，可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录！ 
★  支持在线检测程序升级情况，可及时获得程序更新的信息。★★ 签名  ●  
     可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe    [自解压]

Answer 2

Tstrings怎么赋给string?
当然，这是不可能的
你可以存到Tstringlist中。

Answer 3

var
  MyStringList:TStringList...
...
...
MyStringList:=TStringList.Create;
//程序里用到Memo1.Lines的用MyStringList
else
    begin //body text
      if Msg.MessageParts.Items[intIndex] is TIdText then
      begin
        MyStringList.Clear;
        MyStringList.AddStrings(TIdText(Msg.MessageParts.Items  
                          [intIndex]).Body);
      end
    end;MyStringList.Free;