delphi 怎么传送字符串

来源：百度知道 编辑：UC知道 时间：2024/05/27 13:37:19
</LI></UL></DIV></DIV><!--留言板--><A name=a_comment></A>
<DIV class=hylist_nr id=tabselect5>
<DIV class=mini_pl style="MARGIN: 5px 0px; WIDTH: 568px">
<DIV class=mini_pl_top id=commentTitle>发表留言：</DIV>
<DIV class=mini_pl_text id=content_div style="PADDING-LEFT: 4px; WIDTH: 568px">
<SCRIPT type=text/javascript>
comment_editor = new webEditor("comment_editor" , $("content_div") , 545, 120);
comment_editor.init("");
</SCRIPT>
</DIV>
<DIV class=liuyan_end><INPUT class=btn1 id=btnSaveWords onclick=commitWords(); type=button value=留言 name=Submit>
</DIV></DIV>
怎么将LISTBOX里的一行字符串送到上面comment_editor.init("")的双引号里，最好是详细的代码！
comment_editor.init("");
是一个 JV 动作
我是把comment_editor.init("")分成2部份，然后comment_editor.init(" + List

详细的代码太多了。百度发不了。

s:=LISTBOX.item.text;
qq.Close ;
qq.Host:='photo.aaaaa.com';
qq.Port :=80;
s1:='step=2&phone='+edit2.text+'&image.x=41&image.y=20';
//sq:=sq+'Content-Length: '+inttostr(length(s1))+#13#10;
sq:=sq+'POST /new/register.jsp HTTP/1.1'+#13#10;
sq:=sq+'Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*'+#13#10;
sq:=sq+'Referer: http://photo.aaaa.com/new/register.jsp'+#13#10;
sq:=sq+'Accept-Language: zh-cn'+#13#10;
sq:=sq+'Content-Type: application/x-www-form-urlencoded'+#13#10;
sq:=sq+'UA-CPU: x86'+#13#10;
sq:=sq+'Accept-Encoding: gzip, deflate'+#13#10;
sq:=sq+'User-Agent: Mozilla/4.0 (compatible;