RC4 Verschlüsslung für Delphi

[hadschi92]

Mich interessiert das Ganze auch. Und zwar verwende ich den Code von hier: http://www.delphipraxis.net/internal...&highlight=rc4

Wenn man binäre Dateien also verschlüsseln will, kann man dann direkt TMemoryStream verwenden? Ich denke nicht, aber bis jetzt sieht mein Code so aus:

Delphi-Quellcode:

var FileToEncrypt, EncyptedFile: TMemoryStream;
    EncryptingFile: TRC4Context;
begin
  RC4Init(EncryptingFile,'Passwort');
  RC4Code(EncryptingFile, FileToEncrypt, EncyptedFile, FileToEncrypt.Size);
  Rc4Done(EncryptingFile);
end;

Ich werde auch nicht ganz schlau aus dem Verschlüsselungsalgorithmus, wird nur ein Zeichen von Source verschlüsselt oder die ganze Datei? Und die Datei mit oben genannter Funktion in einen String umzuwandeln wird auch nicht das wahre sein, dabei treten bestimmt Fehler auf...

Edit: Wir arbeiten an dem gleichen Problem, deshalb wird es wohl ok sein wenn wir im gleichen Thread schreiben.