Ein bestimmtes Zeichen aus einem String löschen

[Rabbid]

Hallo,

Ich bin was Delphi betrifft ein Anfänger und habe ein Problem, was ich einfach nicht gelöst bekomme:
Es soll ein bestimmtest Zeichen das in einem Editfeld angegeben wird, aus einem String gelöscht werden, den man in einem anderen edit fenster eingibt, per Button soll dieses dann ablaufen.



procedure Tedlaenge.btloeschezeichenClick(Sender: TObject);
var a,b: Integer;
begin
a:= Length(edzeichenkette.text);
for b:= 1 to a do
begin

if edzeichenkette.text[b]=edzeichen.text then edzeichenkette.text[b]:='';

end;

das ist mein Lösungsansatz der aber leider nicht funktioniert!
edzeichenkette.text soll der String sein,
edzeichen.text soll das Zeichen sein, welches aus dem String gelöscht werden soll!

Vielen dank schonmal

MfG Rabbid