encryptstream bei Lockbox

[-Volle-]

Hi,

ich versuche seit ner weile einen Stream zu verschluesseln. Dabei bin ich auf die Komponente Lockbox gestossen, und fand sie auch gleich ansprechend, da sie relativ leicht zu bedienen ist.

String kann ich mit dieser Komponente einfach verschluesseln, dateien auch, aber sobald es an stream geht bekomme ich probleme.

ich hab es so versucht:

Delphi-Quellcode:

// rdl ist meine Rijndael komponente von Lockbox !
....
var ms,cipher:Tstream;
begin
ms:=Tmemorystream.create;
cipher:=Tmemorystream.create;
memo1.lines.savetostream(ms);
rdl.generaterandomkey; 
rdl.encryptstream(ms,cipher);
ms.free;
memo2.lines.loadfromstream(cipher);
cipher.free;
end;

das problem ist, dass ich bei der zeile

Delphi-Quellcode:

rdl.encryptstream(ms,cipher);

im Progamm eine Fehlermedung bekomme:

"Invalid File type"

.. ich versuch doch garnicht eine datei zu verschluesseln, sondern einen stream .. ?

in der Hilfe ist die Funktion encryptstream so beschrieben:

Delphi-Quellcode:

var ms,cipher:Tstream;
begin
ms:=Tfilestream.create('test.txt',fmopenread);
cipher:=Tfilestream.create('test.enc',fmcreate);
rdl.generatekey('Passphrase');
rdl.encryptstream(ms,cipher);
ms.free;
cipher.free;
end;

so geht alles aber bei einem Memorystream geht es nicht,... was ich komisch finde, da man ja fuer dateien die encryptfile funktion benutzen kann ...

vllt kennt sich einer mit der kompo aus und kann mir den kleinen schlag auf den hinterkopf geben, damit ich vom schlauch fall, auf dem ich steh ... das Forum der Porgrammierer der kompo ist leider auch nicht wirklich gut besucht, deshalb ist hilfe von ihnen relativ ausgeschlossen ... :<

thx im voraus !!

[-Volle-]

ok ich habs geschafft mich selbst vom schlau auf dem ich stand runter zu schucken.

hab vergessen, vor der verschluesselung den stream zu resetten ... grMl ... habs ewig nich bemerkt :<