On 2015-03-16 20:05, Antonio Sanguigni wrote: > en.WriteAnsiString(Memo1.Lines.Text); > fs.WriteBuffer(Pointer(s1.DataString)^, length(s1.DataString)); > en.Free;
Maybe you decryption isn't working because the encrypted text you created isn't complete. Normally you need to call Flush to write the remaining bytes before you free the TBlowFishEncryptStream instance. I normally use the Read() and Write() methods too. I've never used Blowfish WriteAnsiString() before. Regards, - Graeme - -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
