Delphi Was bedeutet dieser Quellcode ? --- Verschlüsselungprogramm

Thema durchsuchen

Ansicht

Themen-Optionen

Was bedeutet dieser Quellcode ? --- Verschlüsselungprogramm

Offene Frage von "Freak1993"

Ein Thema von Freak1993 · begonnen am 4. Jan 2010 · letzter Beitrag vom 4. Jan 2010

Vorheriger Beitrag

Nächster Beitrag

Freak1993

Registriert seit: 21. Jun 2009
Ort: Berlin
2 Beiträge

Was bedeutet dieser Quellcode ? --- Verschlüsselungprogramm

4. Jan 2010, 17:42

Hi,

ich hab mal ne Frage, da ich letztens im Intenet nach Verschlüsselungssoftware gesucht habe bin ich auf die Idee gekommen selbst ein kleines Prog zu programmieren. Da bin ich dann auf diesen Code gestoßen :

markieren

Delphi-Quellcode:

			 procedure TForm1.Button2Click(Sender: TObject);

var

s : string;

i : integer;

begin

  s:=Memo1.Text;

  for i:=1 to length(s) do

    s[i]:=char(22 Xor Ord(s[i]));

    Memo2.text := s;

end;