L
loadymf
Unregistered / Unconfirmed
GUEST, unregistred user!
源码例子：
htmlstr:='<tr><td align="left">宠物名字：累死人了</td></tr>';
htmlfc:=0;
bstr:='宠物中心：';
hstr:='</td></';
i:=posex(bstr,htmlstr,htmlfc);
j:=posex(hstr,htmlstr,i+1);
l:=length(bstr);
m:= length(hstr);
htmlfc:=j;
readkey1:=copy(htmlstr,i+l,j-i-m);
showmessage('前面：'+edit7.Text+#13#10+'后面:'+edit8.Text+#13#10+readkey1);
//源码结束。。。。
纯中文，纯英文都可以正确执行的。不过混合后就变了。
htmlstr:='<tr><td align="left">宠物名字：累死人了</td></tr>';
htmlfc:=0;
bstr:='宠物中心：';
hstr:='</td></';
i:=posex(bstr,htmlstr,htmlfc);
j:=posex(hstr,htmlstr,i+1);
l:=length(bstr);
m:= length(hstr);
htmlfc:=j;
readkey1:=copy(htmlstr,i+l,j-i-m);
showmessage('前面：'+edit7.Text+#13#10+'后面:'+edit8.Text+#13#10+readkey1);
//源码结束。。。。
纯中文，纯英文都可以正确执行的。不过混合后就变了。