论坛 › Delphi交流 › 怎么样去掉一个字符串的某一个字符前面的一段字符!

以德服人 发表于 2012-8-12 20:25:25

怎么样去掉一个字符串的某一个字符前面的一段字符!

本帖最后由 以德服人 于 2012-8-12 20:39 编辑

怎么样去掉一个字符串的某一个字符前面的一段字符!
例如：FE FE FE FE 68 AA AA AA AA AA AA 68 11 04 34 37 33 37 B6 16
我想去掉68和68前面的的字符，问题是68是固定值，68前面会有一些不同的字符出现，这个怎样实现？

woawn 发表于 2012-8-13 23:40:10

先抢个沙发

woawn 发表于 2012-8-13 23:53:08

本帖最后由 woawn 于 2012-8-16 17:03 编辑

str := Tstring;
str := tStringList.Create;
for i= 0 to length(str) do
      begin
      if str(i)='6' and str(i+1)= '8' then
                begin
                        str := copy(str,i+2,length(str)-(i+2))
                        i:= 0;
                end;
      end;


感觉这样应该是可以的，楼主试试吧

(^o^)/ 发表于 2012-8-20 17:40:49

林之白狼 发表于 2012-11-27 13:04:18

直接一个Pos，一个delete搞定
function Get(); string;
var
tmp : string;
i : integer;
begin
tmp:='FE FE FE FE 68 AA AA AA AA AA AA 68 11 04 34 37 33 37 B6 16 ';
i := pos(tmp,'68');
delete(tmp,1,i);
result := tmp；


end;

zhouzhou 发表于 2013-10-16 23:12:25

{:5_99:}      还是很晕

查看完整版本: 怎么样去掉一个字符串的某一个字符前面的一段字符!