文字列から指定した文字を無くすには？

しんご 2005-08-03 03:54:31 No: 16797

string型のある文字列（例えば'abcde')からその中にある、ある文字または文字列（例えば'c')を無くすことは出来ますか？
結果として'abde'という文字列になるようにしたいのですが、やり方がわかりません。

なにはなくともヘルプ 2005-08-03 03:59:40 No: 16798

「文字列処理ルーチン」を見てね。

Fusa 2005-08-03 08:03:14 No: 16799

StringReplace？

B 2005-08-03 09:36:40 No: 16800

function DeleteStr(const P,Str:string):String;
begin
  Result:=P;
  while Pos(Str,Result)>0 do
    Delete(Result,Pos(Str,Result),Length(Str))
end;

かみ＠おちゃめ仲間コム URL 2005-08-08 00:51:22 No: 16801

ついでなので

procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s:='abcde';
s := StringReplace(s, 'c', '' ,[rfReplaceAll]);
edit1.text:=s;
end;