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 protected]');
      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);