如何判断变量a中是否有+号???谢谢了。

解决方案 »

  1.   

    if Pos('+',a)>0 then 
      showmessage('有加号')
    else
      ShowMessage('没有加号');
      

  2.   

    while(true) do
    begin
      i := pos('+', a);
      if i > 0 then a[i] := '_'
      else break;
    end;
      

  3.   

    StringReplace
    看Help去http://lysoft.7u7.net
      

  4.   

    if Pos('+',a)>0 then 
    StringReplace(a,'+', '_', [rfReplaceAll]);
      

  5.   

    Uses StrUtils;procedure TForm1.Button1Click(Sender: TObject);
    begin
    s:='12345+aadf+zcxcv';
    s:=AnsiReplaceStr(s,'+','_');
    ShowMessage(s);
    end;
      

  6.   

    再有类似字符串的问题时,楼主可以参考一下帮助的string handling routines部分