我有一个字符串
str : = '我有一个'字符串';
怎么样把字符串里的引号去掉!!!

解决方案 »

  1.   

    str : = '我有一个''符串';StringReplace(str, '''', '', [rfReplaceAll])
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      S : String;
      i : integer;
    begin
      S:='sdfsdf''sdf''dsf';
      i:=pos(#39,S);
      while i>0 do
      begin
        Delete(s,i,1);
        i:=pos(#39,S);
      end;
      edit3.Text:=s;
    end;
      

  3.   

    这样编译能通过么? 它会str : = '我有一个'这是一个字符串,而后面的是非法命令的啊.
      

  4.   

    同意 cdsgajxlp(起名很难) 的  找到 #39 就delete
      

  5.   

    请教高手,为什么delphi看到的参数后面都有一个#%$$??? 比如说操作access的语句时后面总是带个'select ....'#$$$%
    后面的什么,我怎么去掉,
      

  6.   

    function TForm1.GetNewString:String;
    var
      S : String;
      i : integer;
    begin
      S:='sdasdf'fdffesdd'''df''sdf''dsf';
      S:=StringReplace(S,'''','',[rfReplaceAll, rfIgnoreCase]);
      Result:=S;
    end;
      

  7.   

    请教高手,为什么delphi看到的参数后面都有一个#%$$??? 比如说操作access的语句时后面总是带个'select ....'#$$$%
    后面的什么,我怎么去掉,//那是你在调试的时候看见的吧    好象不是  #$$$%   而是  #$D#$A 吧#$D=#13 回车#$A=#10 空格
      

  8.   

    因为query的sql是个TStrings类型,每一行结束都会加个回车换行符,也就是#13#10,跟踪的时候如果写query1.sql.gettext你就不会看到#13#10了,不过它还是存在的。这个符号你不用管它。