Chiffre-Problem

[Marcel Hans]

Danke für eure Hilfe. Mit letzem Fall (mit yn) gibt es das Problem mit dem Wechsel nicht.
Ich hab das Problem mit der Schleife gelöst:

Code:

var eingabe:string;
index:integer;

begin
eingabe:= memonimm.lines.GetText;
for index := 1 to Length(eingabe) do
begin
    if eingabe[index] = 'd' then eingabe[index]:= 't'
    else if eingabe[index] = 't' then eingabe[index] := 'd';

end;