MOD und EXTENDED arbeiten nicht zusammen, alternative?

[trockentaucher]

Hallo, in einem html/java habe ich folgendes gefunden:

Delphi-Quellcode:

function crypt(f) {
  var e = f.T5.value
  var klartext = f.T9.value
  var n = f.T3.value
  var ergebnis = 1
  if (klartext < n*1) {
    for (i=1;i<=e;i++) {
      ergebnis *= klartext
      ergebnis %= n
    }
    f.T10.value = klartext+" hoch "+e+" (mod "+n+") = "+ergebnis
    f.T17.value = n
  }
  else {
    hilf = n-1
    alert("Nur Zahlen von 0 bis "+hilf+" können verschlüsselt werden !")
  }
}

Diese Funktion macht nicht anderes als (ERGEBNISS = Zahl^E mod N); gehört zu einer simplen Verschlüsselung von Zahlen durch die Anwendung von Primzahlen. Dieses wollte ich eigentlich unter Delphi einsetzen (D7 prof.), was aber nicht funzt, weil ZAHL^E als Ergebniss einen EXTENDED-Wert liefert: ERGEBNISS := Power(Zahl, E) mod N; {ergibt Operanden-Fehler} Gibt es ein Mathe-Genie hier im Forum, der eine Lösung für D7 aus der Tasche zaubern kann?