可以试试这样
on hptosp hp,zqlinespace
htext = ""&RETURN
set ff= the number of lines in member(hp).text
put "
"&RETURN after htext
put "" after htext
repeat with i= 1 to ff
put ""&member(hp).line[i].text&" | " after htext
end repeat
put "
"&RETURN after htext
put "
"&RETURN after htext
put "" after htext
member("sp").html = htext
member("sp").fontsize=zqlinespace
end