TIdHTTP 控件使用post方法无法提交数据 请问各位前前辈帮忙看看

我在delphi7下使用TIdHTTP控件使用post方法给一网页发一信息，但无法成功,会是什么问题？大家帮我看看是哪里不对.谢谢
大家可以使用http://luar.com.hk/blog/?p=727验证一下


sPostUrl := 'http://luar.com.hk/blog/wp-comments-post.php';
AStrList := TStringList.Create;
AStrList.Add('author=aaasdfgdfgfd');
AStrList.Add('url=http://www.dfjd.com');
AStrList.Add('email=dsfsdf@163.com');
AStrList.Add('comment_post_ID=727');
AStrList.Add('comment='+sUser);
sBody:= IdHTTP.Post(sPostUrl,AStrList);
IdHTTP.Destroy;
AStrList.Destroy;
FShowInfo:= '提交成功!';
Synchronize(ShowInfo);
FUrl := sUrl;
FFinish := false;
Synchronize(UpdataAddr);