[Lazarus] Encryption compatible with .net

[DougC]

After quick look I noticed that



var

  Vector : array of Byte;



  SetLength(Vector, 8);

  Vector[0] := 1;

  Vector[1] := 2;

  Vector[2] := 3;

  Vector[3] := 4;

  Vector[4] := 5;

  Vector[5] := 6;

  Vector[6] := 7;

  Vector[7] := 8;



does not match



  Dim vector As String = "12345678"



Should be something like

  Vector[0] := '1';

  Vector[1] := '2';

  Vector[2] := '3';

  Vector[3] := '4';

  Vector[4] := '5';

  Vector[5] := '6';

  Vector[6] := '7';

  Vector[7] := '8';



I didn't look at the rest.




-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20151115/5e5724cd/attachment-0003.html>