Verschlüsselung mit Monoalphabetischer Substitution

[marabu]

Hallo Engel90,

StringReplace() ist eine Funktion!

Delphi-Quellcode:

// ...
text := StringReplace(text, 'ß', 's', [rfReplaceAll]);

SetLength(Result, Length(text));

for i := 1 to Length(text) do
begin
  { ... }
  Result[i] := ...
end;

Grüße vom marabu