procedure TForm1.Button1Click(Sender: TObject);

怎么提交   save 这个表单  表单内容     
<FORM name="form" onsubmit="return check()" action="save.asp" method="post">    
<TR bgcolor="#3399CC">    
<TD colspan=2>    <div align="center">    <strong>    <FONT color=#ffffff>为了您私服的人气，建议您正确，认真的填写以下资料　带    <FONT color=#FF0000>*     </FONT>    <FONT color=#0000FF>    </FONT>必须填写    </FONT>    </strong>    </div>    </TD>    
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD width="15%" align=middle>    <FONT color=#000000>游戏分类    </FONT>    </TD>    
<TD width="85%">    <FONT color=#000000>    <SELECT id=select size=1 name=gameid>    
<option value=6>传奇    </option>    
</SELECT>*&nbsp;    </FONT>    </TD>               
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD align=middle>    <FONT color=#000000>服务器名    </FONT>    </TD>    
<TD>    <font color="#000000">    
      <INPUT name=name size="16" maxLength=7>    
  *    </font>     <FONT color=#000000>限7个汉字    </FONT>    </TD>                 
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD align=middle>    <FONT color=#000000>服务器IP    </FONT>    </TD>    
<TD>    <font color="#000000">    
      <INPUT name=ip id="ip" size="16" maxLength=16>    
  *请填写你的IP地址 需要使用登陆器请填写    <b>点击下载登陆器    </b>，按照指定字样填写，否则将删除！    </font>    </TD>    
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<SCRIPT language=javascript src="js/setday.js">    </SCRIPT>    
<TD align=middle>    <FONT color=#000000>开区时间    </FONT>    </TD>    
<TD>    <FONT color=#000000>    <INPUT name=sdate onfocus=setday(this) value="点击选择" size=10 maxlength="12"> &nbsp;     
<SELECT name=hour>    
<OPTION value="" selected>开区小时    </OPTION>    
<OPTION value=07>上午7点    </OPTION>    
<OPTION value=08>上午8点    </OPTION>    
<OPTION value=09>上午9点    </OPTION>    
<OPTION value=10>上午10点    </OPTION>    
<OPTION value=11>上午11点    </OPTION>    
<OPTION value=12>中午12点    </OPTION>    
<OPTION value=13>下午13点    </OPTION>    
<OPTION value=14>下午14点    </OPTION>    
<OPTION value=15>下午15点    </OPTION>    
<OPTION value=16>下午16点    </OPTION>    
<OPTION value=17>下午17点    </OPTION>    
<OPTION value=18>晚上18点    </OPTION>    
<OPTION value=19>晚上19点    </OPTION>    
<OPTION value=20>晚上20点    </OPTION>    
<OPTION value=21>晚上21点    </OPTION>    
<OPTION value=22>晚上22点    </OPTION>    
</SELECT>    
&nbsp;                 
<SELECT name=minute>    
<OPTION value=00 selected>00分    </OPTION>    
<OPTION value=30>30分    </OPTION>    
</SELECT>*    </FONT>    </TD>                
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD align=middle>    <FONT color=#000000>客服QQ    </FONT>    </TD>    
<TD>    <font color="#000000">    
      <INPUT name=QQ value="游戏里查询" size="16" maxLength=10>    
  *填写QQ号码即可 没有QQ请默认    </font>    </TD>                 
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD align=middle>    <font color="#000000">地区线路    </font>    </TD>    
<TD>    
      <font color="#000000">    
<SELECT id=addr size=1 name=addr>    
      <OPTION value="" selected>地区    </OPTION>    
                      <OPTION value=南方>南方    </OPTION>    
                      <OPTION value=北方>北方    </OPTION>                    
                      <OPTION value=中国>中国    </OPTION>    
    
                </SELECT>    
　                 
<SELECT id=select2 size=1 name=Service>    
      <option selected>线路    </option>    
      <option value='0'>电信    </option>    <option value='1'>网通    </option>    <option value='2'>双线    </option>    
</SELECT>    
*    </font>    </TD>                
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD align=middle>    <FONT color=#000000>版本简介    <BR>    </FONT>    </TD>    
<TD>    <font color="#000000">    
      <input name="xingzhi" type="text" id="xingzhi" size="56" maxlength="12">    
  *游戏简单介绍限12字内    </font>    </TD>                 
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD align=middle>    <FONT color=#000000>网站地址    </FONT>    </TD>    
<TD>    <font color="#000000">    
      <input name=homepage id=homepage size=30 maxlength=50>    
  *你的网站地址    </font>    </TD>                
</TR>    
<TR vAlign=center bgcolor="#FFFFCC">    
<TD align=middle>    <font color=#000000>登陆器地址    </font>    </TD>    
<TD>    <font color="#000000">    
      <INPUT name=download id=download size=30 maxLength=60>    
  *如果IP填写了点击下载登陆器 请在这填写登陆器下载地址 没有可填写您的网站地址    </font>    </TD>                
</TR>    
<TR align="center" vAlign=center bgcolor="#FFFFCC">    
<TD colSpan=2>    <font color="#000000">    
      <INPUT style="WIDTH: 100px" type=submit value= &#30830;&#35748;&#25552;&#20132; name=btn>    
</font>    </TD>    
</TR>    </FORM>    
这是我写的程序   procedure TForm1.Button1Click(Sender: TObject);    var       S:TStringList;    
     
begin      S := TStringList.Create;      try    
  S.Add('gameid=6&name=eeee&ip=%B5%E3%BB%F7%CF%C2%D4%D8%B5%C7%C2%BD%C6%F7&sdate=2008-04-21&hour=08&minute=00&QQ=%');    
  S.Add('D3%CE%CF%B7%C0%EF%B2%E9%D1%AF&addr=%B0%D9%D5%D7&Service=0&xingzhi=d&homepage=http%3A%2F%');    
  S.Add('2Fwww.baidu..com&download=http%3A%2F%2Fwww.baidu..com&btn=%C8%B7%C8%CF%CC%E1%BD%BB');    
  strMsg:=IdHTTP1.post('http://www.96sf.com/save.asp',S);    
  memo1.Text:=strMsg;    
  finally    
    sParams.Free ;    
  end;    
end;