TIDTcpClient的问题，帮忙啊

Question

//创建TIDTcpClient组件开始连接邮件服务器
   mclient := TIDTcpClient.Create(nil);
   mclient.BoundIP := '192.168.8.36';
   mclient.Host    := '222.134.54.58';
   mclient.Port := 25;   try
    mclient.Connect;
   except
     mclient.Free;
     Terminate;
   end;
   try
    Ret := mclient.CmdResult;
    plistbox.Items.Add(ret);
    mclient.SendCmd('helo');    Ret := mclient.CmdResult;
    plistbox.Items.Add(ret);
    .
    .
    .
问题：在调用SendCmd发送的时候mclient.CmdResult中放的才是上次sendcmd返回的结果
      怎样才能不用sendcmd就知道上次sendcmd的结果？

Answer 1

当用telnet 登陆到25号端口的时候可以发送一个命令就有一个相应