关于邮件附件保存到指定目录的问题？(50分)

你好：
我想把邮件附件保存到指定的目录，可是在给定了目录后，邮件附件就是保存在程序
运行的目录，请问如何修改？代码如下：
procedure TForm1.Button3Click(Sender: TObject);
begin
NMPOP31.GetMailMessage(strtoint(edit5.Text));
Memo2.Text := NMPOP31.MailMessage.Body.Text;
Edit7.Text := NMPOP31.MailMessage.Subject;
Edit6.Text := NMPOP31.MailMessage.From;
NMPOP31.AttachFilePath:='c:/test';
end;

解决这个问题就是要把保存文件的路径最后加/，例如：
procedure TForm1.Button3Click(Sender: TObject);
begin
NMPOP31.GetMailMessage(strtoint(edit5.Text));
Memo2.Text := NMPOP31.MailMessage.Body.Text;
Edit7.Text := NMPOP31.MailMessage.Subject;
Edit6.Text := NMPOP31.MailMessage.From;
NMPOP31.AttachFilePath:='c:/test/';
end;

nod