title: Inno Setup: Ord Function or eqivalent?
body: <p>I'm using inno setup to "crypt" a password:</p>
  
  <pre><code>function XORcrypt(Value,Key: string): string;
  var
      p,k,pl,kl: integer;
  begin
      {very basic encryption, using bitwise XOR}
      result:=Value;
      pl:=Length(Value);
      kl:=Length(Key);
      if (pl&gt;0) and (kl&gt;0) then
      begin
          p:=1; k:=1;
          while (p&lt;=pl) do
          begin
              Result[p]:=Char(Ord(Value[p]) XOR Ord(Key[k]));
              if k=kl then k:=1 else k:=k+1;
                  p:=p+1
          end; {while}
      end; {if}
  end; {XORcrypt}
  </code></pre>
  
  <p>inno seems not to know the pascal function <strong>Ord</strong> which returns the ASCII value of a requested character (67 for 'C')</p>
  
  <p>Any solutions?</p>