Delphi在字符串中删除指定字符串
var
i:Integer;
begin
fori:=1toLength(hex)do
begin
ifCopy(Hex,1,Length(str))=strthen
begin
Delete(Hex,1,Length(str))
end
else
begin
result:=result+Copy(Hex,1,1);
Delete(Hex,1,1);
end;
end;
end;
版权声明
声明：有的资源均来自网络转载，版权归原作者所有，如有侵犯到您的权益
请联系本站我们将配合处理！
上一篇 : 小学教师创新教育演讲稿
下一篇 :低年级教学小策略