Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: kurze Verschlüsselung

    Delphi
    by ichbins, 6. Nov 2005
  Ein Beispiel für lesbare XOR-Verschlüsselung:
  
  const
  hexes:array of char=('0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F');
  
  function hextobyte(hex:string):byte;
  var
  i:integer;
  begin
  for i:=0 to 15 do