Encrypt decrypt blowfish and I don't understand nothing!

[Robert W.B.]

Hi Friends. I saw this example in the forum but ,how do I call it?   
Where do I call it?  From a button? 
How do I save it? 
mystring:='I don't understand'; // that i would want to encrypt and decrypt?
Thanks for any help.
//
procedure Encrypt(InStream, OutStream: TStream; const Key: string);
var EC: TStream;
begin
   EC := TBlowFishEncryptStream.Create(Key, OutStream);
   try
      EC.CopyFrom(InStream, InStream.Size);
   finally
      EC.Free; // Destroy automatically calls Flush
   end;
end;

procedure Decrypt(InStream, OutStream: TStream; const Key: string);
var EC: TStream;
begin
   EC := TBlowFishDeCryptStream.Create(Key, InStream);
   try
      OutStream.CopyFrom(EC, InStream.Size);
   finally
      EC.Free; // Destroy automatically calls Flush
   end;
end;                     

//

[Alain]

Have a look to DecryptString and EncryptString.

[Robert W.B.]

uses DCPrijndael, DCPsha256  I put this in uses but, i got this message

unit1.pas(1,1) Fatal: Can't find unit DCPrijndael used by Unit1

Can You tell me what's wrong?

Best regards
Robban 

[Alain]

uses DCPrijndael, DCPsha256  I put this in uses but, i got this message

unit1.pas(1,1) Fatal: Can't find unit DCPrijndael used by Unit1

Can You tell me what's wrong?

Best regards
Robban 

Did you install successfully the DCPCrypt package ?