Verschlüsselung bzw. Entschlüsselung will nicht gelingen

[DayDreamer87]

Zitat von Uwe Raabe:

Das sind doch die relevanten Stellen:

Delphi-Quellcode:

  Code := Code - Z;
  If (Code > 122) Then
    Code := Code - 26;

Delphi-Quellcode:

  Code := Code + Z;
  If (Code < 122) Then
    Code := Code + 26;

Überleg dir mal, warum bei der Verschlüsselung die IF-Abfrage kommt und was sie bewirkt. Dann überleg mal, wie dieser Vorgang rückgängig gemacht werden muss. Dann siehst du auch, was bei der Enschlüsselung falsch läuft.

Ich bin in der Materie zwar noch relativ neu und, sofern falsch, beachtet mich gar nicht...

Aber nachdem ich das ganze mal nachgebastelt habe, funktionierts nu bei mir
Fehler dürfte das im Zitat rot markierte Zeichen sein.

Hoffe mal, dass mein erster Beitrag korrekt ist.

Grüße

Day

Edit: Farbige Markierungen im Delphi Code funktionieren nicht...
In Prozedur B:
If (Code > 122) Then ... so funktionierts

[Faffy]

Perfekt, vielen Dank. Jetzt funktioniert es echt wunderbar, ihr habt mir sehr geholfen.

Eine Frage hätte ich jedoch noch, da mir das nicht ganz klar ist.
Warum muss bei Procedure A
Procedure TCaesar.A (T : String; Var T2 : String; Z : Integer); Das "Var T2 : String" hinter "T : String;" stehen und bei Procedure B

Procedure TCaesar.B (Var T2 : String; T : String; Z : Integer); das "Var T2 : String;" eben am Anfang?

[Faffy]

Zitat von Faffy:

Perfekt, vielen Dank. Jetzt funktioniert es echt wunderbar, ihr habt mir sehr geholfen.

Eine Frage hätte ich jedoch noch, da mir das nicht ganz klar ist.
Warum muss bei Procedure A
Procedure TCaesar.A (T : String; Var T2 : String; Z : Integer); Das "Var T2 : String" hinter "T : String;" stehen und bei Procedure B

Procedure TCaesar.B (Var T2 : String; T : String; Z : Integer); das "Var T2 : String;" eben am Anfang?

Dies hier steht bitte immer noch als zentrale Frage offen, verzeiht mir den Doppelpost, aber ich hatte Angst, dass es so sonst übergangen wird .

[Klaus01]

Zitat von Faffy:

Perfekt, vielen Dank. Jetzt funktioniert es echt wunderbar, ihr habt mir sehr geholfen.

Eine Frage hätte ich jedoch noch, da mir das nicht ganz klar ist.
Warum muss bei Procedure A
Procedure TCaesar.A (T : String; Var T2 : String; Z : Integer); Das "Var T2 : String" hinter "T : String;" stehen und bei Procedure B

Procedure TCaesar.B (Var T2 : String; T : String; Z : Integer); das "Var T2 : String;" eben am Anfang?

Wie sieht denn die Parameterlist in der Type/Klassen-Deklaration aus?
Grüße
Klaus