学习型 ASP/PHP/ASP.NET 主机 30元/年全能 ASP/PHP/ASP.NET 主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付
轻松建立自己的群组,招兵买马   
发新话题
打印

高手进来看看!谢谢!!

高手进来看看!谢谢!!

我因为毕业设计需要,用DELPHI做了一个邮件接收系统,系统成功后应该是将所收取的邮件显示在邮件列表中,然后双击列表中内容就可以显示邮件全文.但是我现在连接服务器与获取邮件都没问题了,就是双击后不能显示邮件全文.我用的代码是这段:
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
  nmpop31.GetMailMessage( listbox1.ItemIndex+1);
  Memo1.Text := NMPOP31.MailMessage.Body.Text;
  Edit3.Text := NMPOP31.MailMessage.Subject;
  Edit2.Text := NMPOP31.MailMessage.From;
  Edit5.text:=nmpop31.AttachFilePath;
end;
运行都没有错的,不知道怎么回事,请高手指导我一下!我用的是DELPHI6,谢谢了!

TOP

发新话题