Thema: Delphi xor, was ist falsch?

Einzelnen Beitrag anzeigen

Angel4585

Registriert seit: 4. Okt 2005
Ort: i.d.N.v. Freiburg im Breisgau
2.199 Beiträge
 
Delphi 2010 Professional
 
#5

Re: xor, was ist falsch?

  Alt 11. Okt 2006, 09:28
@marabu:Warum spielt das eine Rolle? Ich fang beim verschlüsseln und beim entschlüsseln beim selben index an, also dürfte das kein unterschied machen oder?


Zitat von Corpsman:
Also sei mir nich bös, aber bei mir gehts so net.


Delphi-Quellcode:

Procedure TForm1.Button1Click(Sender: TObject);
Var
  l: Tstringlist;
Begin
  l := Tstringlist.create;
  l.text := Memo1.Lines.Text;
  l.text := Docrypt(l.text);
  memo1.lines.text := l.text;
  l.free;
End;
Du schreibst die verschlüsselte version ins Memo, du musst ert weider ENTschlüsseln
Martin Weber
Ich bin ein Rüsselmops
  Mit Zitat antworten Zitat