Welche Unit brauch ich dafür...?

[Akut-Programming]

Hi, ich hatte hier in der DP den folgenden Code zu verschlüsseln von Text gefunden. Beim ausführen, meinte der Compiler, das er den Bezeichner "iKey" nicht kennt!! Kann mir da vielleicht jmd. sagen, welche Uses ich eintragen muss damit der Code funzt? Beim eigentlichen Post stands nicht dabei..

Delphi-Quellcode:

procedure Tfrm_main.SaveCrypt(const Filename: TFilename);
var
  MStream    : TMemoryStream;
  FileStream : TFilestream;
  aByte      : Byte;
begin
  MStream:=TMemoryStream.Create;
  FileStream:=TFilestream.Create(Filename,fmCreate);
  Try
    frm_main.mem_text.Lines.SaveToStream(MStream); // Memo in einen MemoryStream speichern
    MStream.Position:=0;
    While MStream.Position<MStream.Size do 
      begin
      MStream.Read(aByte,SizeOf(Byte)); 
      aByte:=aByte xor iKey; // Verschlüsselung   - iKey ist nicht bekannt
      FileStream.Write(aByte,SizeOf(Byte)); 
      end;
  Finally 
    MStream.Free;
    Filestream.Free;
    end;
end;

Gruß,