Delphi RC4 Implementierung - Problem mit längeren Texten

Thema durchsuchen

Ansicht

Themen-Optionen

RC4 Implementierung - Problem mit längeren Texten

Ein Thema von qwertz543221 · begonnen am 11. Jun 2009 · letzter Beitrag vom 11. Jun 2009

Vorheriger Beitrag

Nächster Beitrag

himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.342 Beiträge

Delphi 12 Athens

#10

Re: RC4 Implementierung - Problem mit längeren Texten

11. Jun 2009, 19:00

tausch erstmal die Reinfolge

und wo knallt es genau?
das kann man beim Debuggen schön rausbekommen

(z.B. F7 und Co.)

zusammenfalten · markieren

Delphi-Quellcode:

			//verschlüsseln

rc4init(memo1.Text);

text:=memo2.Text;

text:=rc4encdec(text);

text:=base64enc(text);  // ergebnis codieren

memo2.Text:=text;

//entschlüsseln

rc4init(memo1.Text);

text:=memo2.Text;

text:=base64dec(text);  // text codieren

text:=rc4encdec(text);  // und dann entschlüsseln

memo2.Text:=text;