Ein bestimmtes Zeichen aus einem String löschen

[Rabbid]

var a,b: Integer;
c:String;
begin
a:= Length(edzeichenkette.text);
for b:= 1 to a do
if edzeichenkette.text[b]<>edzeichen.text then
c:=c+edzeichenkette.text[b];
edzeichenkette.text:=c;



jaaaaa es funktioniert!!!
tausend dank