Delphi在字符串中删除指定字符串
var
i:Integer;
begin
for i:=1 to Length(hex) do
begin
if Copy(Hex,1,Length(str)) = str then
begin
Delete(Hex,1,Length(str))
end
else
begin
result:=result + Copy(Hex,1,1);
Delete(Hex,1,1);
end;
end;
end;
未经允许不得转载:亿券答案网 » Delphi在字符串中删除指定字符串
相关推荐
- 【标准答案】第1题. 以顾客需要什么,我们就生产供应什么作为座右铭的企业是( )企业?
- 甲公司正在编制下一年度的生产预算,期末产成品存货按照下季度销量的10%安排。预计一季度和二季度的销售量分别为150件和2
- A注册会计师负责甲公司2010年12月31日的财务报告内部控制进行审计。A注册会计师了解到,甲公司将客户验货签收作为销售
- 当乘坐出租车时,你最担心的是什么()?
- 建设项目工程总承包的基本出发点是借鉴工业生产组织的经验,实现建设生产过程的()。
- 【标准答案】自愿退学的学生可重新报名参加国开学习,学生原来获得的学分,可按免修免考的有关规定进行课程或学分替换。(判断)
- 母系氏族公社时期人类的婚姻形态是()。
- 【习题】团队的类型有( )。 (2 分) A. 多功能型团队 B. 技能型团队 C. 服务型团队 D. 自我管理型团队 E. 虚拟团队
- 《人身保险新型产品信息披露管理办法》(2009年3号令)规定,向个人销售新型产品的,保险公司提供的投保单应当包含投保人确
- ()林四娘告诉陈宝钥她本是何人府上的宫女?