Forum: Algorithmen, Datenstrukturen und Klassendesign
by Faffy,
26. Jan 2014
Dies hier steht bitte immer noch als zentrale Frage offen, verzeiht mir den Doppelpost, aber ich hatte Angst, dass es so sonst übergangen wird :).
Forum: Algorithmen, Datenstrukturen und Klassendesign
by Faffy,
26. Jan 2014
Ich mag lange Variablen nicht, sondern arbeite lieber mit Abkürzungen und weit rechts am Rand mit vielen Kommentaren. Aber dennoch danke für dein Meinungsbild, ich werde jedoch fortfahren, sodass ich es selbst am Besten finde.
Forum: Algorithmen, Datenstrukturen und Klassendesign
by Faffy,
26. Jan 2014
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);
Forum: Algorithmen, Datenstrukturen und Klassendesign
by Faffy,
25. Jan 2014
Ich lege einfach mal alles genauer dar.
Verschlüsselungsbutton:
procedure TForm1.Button1Click(Sender: TObject);
Var T,T2 : String;
Z : Integer;
begin
T := Edit1.Text;
Z:= 7;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by Faffy,
25. Jan 2014
Ah, mir ist aufgefallen, was mein Fehler war.. Ich habe den Quelltext jetzt ein wenig überarbeitet, sodass folgendes entstanden ist:
procedure TForm1.Button2Click(Sender: TObject);
var T, TN : String;
Z : Integer;
begin
T := Edit2.Text; // T = Verschlüsselter Text, der entschlüsselt werden...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by Faffy,
25. Jan 2014
Hey folks,
folgendes Problem beschäftigt mich nun bereits seit einigen Tagen.
Ich habe versucht ein Programm zu schreiben, welches individuell gewählte Worte verschlüsselt, indem man jeden Buchstaben des zu verschlüsselnden Wortes und einen gewissen Wert verschiebt. Die Verschlüsselung an sich funktioniert auch reibungsfrei, jedoch die Entschlüsselung soll das Wort wiederherstellen. Wenn ich...