Ergebnis der Suchanfrage

• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Caeser Verschlüsselung

    Delphi
    by SirMaurice, 26. Mär 2019
  Also nach ein paar motivierenden Sprüchen und ein paar Rendez-vous mit der ASCII-Tabelle, bin ich auf folgende Lösung gekommen.
  Ich bedanke mich bei allen die mir beigestanden haben. :-D
  
  
  function TCaeser.GetGeheimtext : string;
  var
  i : integer;
  begin
  Result := '';
  for i := 1 to length(text) do begin
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Caeser Verschlüsselung

    Delphi
    by SirMaurice, 26. Mär 2019
  Ich möchte ja nicht Z - 25 rechnen sondern der Key ist Z, also 25 Stellen Verschiebung. Zudem wird der Key ja hinzuaddiert und nicht subtrahiert.
  Das Problem ist jetzt aber wenn der Key 25 beträgt und man z.B. ein B verschlüsseln möchte, rechnet man den ASCII-Wert von B, also 66, plus den Key, also 25,
  dies ergibt dann 91 und somit ein "[".
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Caeser Verschlüsselung

    Delphi
    by SirMaurice, 26. Mär 2019
  Das hatte ich vergessen, danke dafür schonmal.
  Das Problem ist, dass wenn ich einen "Key:= ord(Z) - 65" habe, also die Verschiebung 25 Stellen beträgt und dies mit der Lösung aus der anderen Antwort berechne ein Zeichen ") + key" größer als "ord([)" , also 91, wird.
  
  Das könnte man theoretisch mit einer if-Anweisung umsetzen, ich weiß nun nur nicht, wie ich das zu einer vernünftigen Lösung...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  Caeser Verschlüsselung

    Delphi
    by SirMaurice, 26. Mär 2019
  Hallo, ich bin's mal wieder.
  
  Ich muss ein Programm schreiben welches die Zeichen eines Strings um 'key' Stellen verschiebt. Also wenn der 'key' ein B ist wird aus einem A ein B. Soweit klappt das auch, also für einzelne Zeichen. Da kommt auch mein Problem. Ich verstehe nicht ganz, wie das Ganze für einen kompletten String gehen soll bzw. wie ich die nun umgewandelten Zeichen zu einem String...