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ß,

[Pseudemys Nelsoni]

bist du sicher das iKey keine variable bzw konstante ist?

[Tryer]

Zitat von Akut-Programming:

Kann mir da vielleicht jmd. sagen, welche Uses ich eintragen muss damit der Code funzt?

Nichts weiter.. iKey ist nur ein Platzhalter.

Du solltest dich schon etwas genauer mit der XOR-Verschlüsselung befassen, dann verstehst Du auch was dort gemacht werden soll.
(Vielleicht hilft es ja schon den Thread aus dem du den Code kopiert hast mal ganz zu lesen )

MfG,
Tryer

[Akut-Programming]

Zitat von Tryer:

(Vielleicht hilft es ja schon den Thread aus dem du den Code kopiert hast mal ganz zu lesen )

Das hab ich auch, hab ihn grad eben sogar nochmal gelesen. Hier steht nirgendwo, wofür iKey ist Naja, muss ich mal noch n bissl gucken..

Gruß,

[fkerber]

Hi!

Antwort hier:
http://www.delphipraxis.net/internal...ct.php?t=19786

Ciao fkerber

[Akut-Programming]

Joa, ne dank dir fKerber... hatts dann auch gefunden.. es is ne Konstante

Gruß,

[fkerber]

Hi!

Konstante würd ich es, bei der Antwort irgendwie nicht nennen, oder?
Ist ja jetzt nicht wirklich konstant, sondern nur eine Variable, die etwas vom Nutzer eingegebenes aufnimmt.

Ciao fkerber

[Akut-Programming]

Naja, ich hatte sie jetzt erstmal als konstante vergeben. Werds jetzt auch als Passwort nutzen..

Gruß,