5,402
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
MINJIANQ 2003-04-24
- 打赏
- 举报
function search():integer;
begin
for i:=length(string)-1 downto 0 do
begin
if string[i]=#39 then //单引号
result:=i; //i是从头开始的位置，从尾length(string)-i
break;
end;
end;
begin
for i:=length(string)-1 downto 0 do
begin
if string[i]=#39 then //单引号
result:=i; //i是从头开始的位置，从尾length(string)-i
break;
end;
end;
