@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