Forum: Programmieren allgemein
by Jacqybaby,
22. Mär 2006
so ich hab mal einen verbalen Algirithmus für das entschlüsseln formuliert:
1. Ermittle Anzahl der Zeilen(memmo.lines.count)
2. Beginne mit dem 1. Buchstaben des verschluesselten textes.
3. (Springe 4 Stellen weiter, schreibe den (an dieser Stelle stehenden) Buchstaben)* schlüssel
4. (Gehe eine Stelle weiter, wiederhole 3.) solange bis length(verschluesselter text) .
Das müsste...
Forum: Programmieren allgemein
by Jacqybaby,
22. Mär 2006
hab es folgendermaßen versucht einzu bauen:
procedure TForm1.verschluesselnClick(Sender: TObject);
var vtext:string;
i,j,s:integer;
begin
klartext:=memo3.Text;
s:=strtoint(schluessel.text);
vtext:='';
Forum: Programmieren allgemein
by Jacqybaby,
22. Mär 2006
wofür steht
"Vtext" ?
was ist "propertie" ?
so weit bin ich jetzt was die Eingabe in das Memo-Feld betrifft:
procedure TForm1.klartexteingabeClick(Sender: TObject);
begin
Forum: Programmieren allgemein
by Jacqybaby,
22. Mär 2006
Aha so weit so gut, jetzt hab ich nur das Problem, dass ich nciht weiss wie ich die Eingabe in ein Edit-Feld so zerteile, dass ich sie als einzelne Buchstaben in die Listbox eingetragen werden damit ich sie dann in dem oben gennanten Algorithmus verabeiten kann.
MFG Jacqybaby
Forum: Programmieren allgemein
by Jacqybaby,
22. Mär 2006
Ich versuche seit gestern krampfhaft diesen Transpositionsverfahren hin zu bekommen. Aber irgendwie will es nicht funktionieren. Also meine benutzer oberfläche sieht so aus:
http://www.jacqyzone.de/jshome/bilder/delphi_krypto.jpg
Wenn ich jetzt einen Text eingebe soll der zeilenweise in die Listbox eingetragen werden,d.h. wenn der Benutzer bei der schluesseleingabe 5 eingibt sollen die...
Forum: Programmieren allgemein
by Jacqybaby,
21. Mär 2006
wie kann ich denn ein Transpositionsverfahren in Delphi umsetzen ? Mir fehlt wie immer der Ansatz. Wie schaffe ich es das der klartext in eine Art Tabelle zeilenweise geschrieben wird und dann verschlüsselt (also spaltenweise) wieder ausgegeben wird ?
MFG Jacqybaby
Forum: Programmieren allgemein
by Jacqybaby,
21. Mär 2006
ok ich hab jetzt richedit genommen,danke.
MFG Jacqybaby
Forum: Programmieren allgemein
by Jacqybaby,
21. Mär 2006
das sollen die felder zu Geheimtext- bzw. Klartexteingabe sein ! Memo ist das irgendwie doof, kann man da keine Listbox nehmen oder einfach ein Editfeld, wlches die selbe größe wie eine Listbox hat ?
MFG Jacqbaby
Forum: Programmieren allgemein
by Jacqybaby,
21. Mär 2006
Hi Leute,
ich brauch unbedingt eure Hilfe. Wir sollen In Delphi ein Programm schreiben das verschiedene Verschlüsselungsverfahren absolviert. Da ich eine totale Null in Delphi bin hoffe ich ihr helft mir. Ich hab folgende grundlegende Fragen:
1. Was für eine Komponente nehme ich am besten für die Klartext/Geheimtext Ein- bzw. Ausgabe ?
2. Welche Verschlüsselungsverfahren würdet ihr mir...