c++ Code nach Delphi portieren

[MasterTobi]

Guten Morgen,

also ich habe hier folgenden Code

Code:

 public Encrypt(string[])
  {
   for(new x=0; x < strlen(string); x++)
     {
        string[x] += (3^x) * (x % 15);
        if(string[x] > (0xff))
        {
           string[x] -= 256;
        }
     }
   return 1;
  }

vll erkennt einer oder der andere diesen code

wie kann ich diesen code nun in delphi umbauen habe schon einiges probiert

(3^x) * (x % 15) <<< hier sagt er mir dann immer fehler, wenn ich dies in delphi umschreibe

vll kann mir jemand helfen


mfg
Tobi

[edit=mkinzler]C-Tag eingefügt Mfg, mkinzler[/edit]
[edit=SirThornberry]Aussagekräftigeren Titel vergeben der das Problem ansatzweise beschreibt - Mfg, SirThornberry[/edit]